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THEY LAUGHED AT ME WHEN I SAT DOWN AT THE KEYBOARD . . . 
BUT OH, WHEN I BEGAN TO PLAY! HERE'S WHAT THEY SAID: 



BPL-ATOn l-"l've had to 
replace three electro- 
universal wristcouplers 
since I got it" 

PROTECTOR. 




CORQUS I -"Even with a 
class II embryonic 
neuroiifter, it is disgustingly 
difTicultto play!' 

SLIME. 




ADN-MARK 11 + -"More fun 
than kicking the servonic 
katdroid;' 

CHICKEM. 




ELF-X2-"CanIbea 
submarine when I grow up?' 

riAUTILUS. 




NAUTILUS, PROTECTOR, CHICKEM AND SLIME ARE ALL TRADEMARKS OF SYNAPSE SOFTWARE. 
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820 Coventry Rd. 
Kensington, CA 94707 
(415) 527-7751 



FOR THE ATARI* HOME COMPUTER. 



*ATARI IS A REGISTERED TRADEMARK OF ATARI, IFiC. 



ATARI SAYS ITS FIRST WORD 

WITH A VOICE BOX BY THE ALIEN GROUP! - — 



THE ALIEN GROUP has emerged from the underground, daring to offer 
a full-featured speech synthesis system that is flexible, low in cost, 
and needs no-accessory devices. No Interface, Cables, Speaker, ^ 
Amp, or External Power Required! VOICE BOX has been -^ 
designed and programmed by Atari users to become the 
integral voice of a 400 or 800 computer. Simply plugged into i 
the serial port, VOICE BOX automatically routes all speech A 
into th^peaker of your television monitor. With the menu- M 
driven operating system supplied, you'll be creating fl 
original, intelligible speech within moments after H 
loading disk or cassette. No lengthy or obscure H 
instructions to wade through. H 

The system includes a dictionary which translates typed V 
text into VOICE BOX's phonetic language. The dictionary can ^ 
be expanded to include as many as 5,000 words of your own ^ 
custom vocabulary. Unlimited speech can be produced by 
straightforward phonetic definiton at any time, even if the 
dictionary should be full. 

The speech routines can be called from other programs for any 
purpose you can conceive. Here ore a few suggested uses: 






SOUND EFFECTS 

• Access 64 phonemes at any of 4 pitch levels to add filtered, 
contoured sound to the Atari audio repertoire. 

GAMES 

• Program aliens to hiss threats, moan when destroyed. 

• Devise weird, non-human tongues for dungeon dwellers. 

• Insert cryptic spoken clues in maze games. 

COMPUTER OPERATION 

• Code verbal prompts and error messages that command 
attention and leave the current display intact. [ 

EDUCATION 

• Gain an introduction to the principles of phonetics. 

• Learn touch typing through spoken feedback from the 
keyboard. 

In addition, the Random Sentence Generotor included in the 
operating system, which prints and speaks endlessly 
I startling, amusing, even poetic combinations of words 

supplied by the user, helps teach school children to identify 
parts of speech and recognize a variety of sentence 
structures. 

A minimum of 16KRAM is required by the operating system. 

Either disk or cassette includes both 16Kand 32K versions. Try 

VOICE BOX VOICE BOX for up to todays, and if it isn't the finest value 

Speech Synthesizer you've ever seen in a computer peripheral, the most 

- challenging and provocative addition you've ever made to 

your system, return it in its original condition for a full 
refund. 

When ordering specify disk- or cassette-based operating system, and enclose check or money-order for $169, or state your 

VISA or AAASTERCARD number Send mail orders to: THE ALIEN GROUP 

27 West 23rd Street or telephone orders from 

Dept. 1 AM to 6 PM New York time 

New York, New York 1 001 (212) 924-5546 



ALSO AVAILABLE AT LEADING COMPUTER STORES THROUGHOUT THE WORLD. 

Atari is a registered trademark of Warner Communications. 
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CATS 

by Jon Voskuil 

Translations by Alan J. Zett 

The Computer-Assisted Testing System 

will turn your micro into a masterful 

testing machine. This time we bring you 

the input module and will complete this 

educational utility in the next issue. 
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Entertainment Tomorrow 

by Fred D'Ignazio and Allen W. Wold 
The authors continue their series on 
computer aided special effects in the film 
industry. This time — a fascinating 
scenario considering the movie theatres of 
the future. 
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My Side of the Page 

by Lance Micklus 

Lance has received some interesting 
response from readers of his review of the 
Modem I. In addition, he gives us his 
comments on supposed software rip-offs. 



17 

A Few Words From the 
Phantom Programmer 

An author who wishes to remain 
anonymous gives his views on a new 
command for BASIC — PUNT. 

18 

Computer Graphics 

by Joan Truckenbrod 
This article is a continuation of the series 
started in May. Transformation 
techniques are explored in-depth, varying 
the rates of change during a 
transformation series. 
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Why Johnny Can't Program 
— Materials for Computer 
Literacy 

by Dean F. Hay den Macy 
Teachers are finding themselves in a 
quandry when choosing educational 
materials to teach computer awareness. 
The author gives an overview of the 
available resources and some he\pTu\ tips 
on how to utilize them. 
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K-Byter 

SNAKE SCRAMBLE by Leonard Vincent 
Race around the base of a tree, swallowing the fallen 
apples as you go. Be careful though, take a bite of your 
own body and you're a goner. 

Enhanced Disk Version 

APPLESOFT EXTENSIONS by Kerry Shetline 
Here are some welcome and badly needed enhancements 
to the features of Applesoft, including RESTORE to line 
number and a true LINE INPUT. 

Programs 

PUZZLE JUMBLE by Steve Faiella 

Create your own custom puzzles, mix them up and try to 

put them back together again. It's not as easy as it might 

sound. 



and graphics game is a joy of frustration to play. In 
addition, the authors have given us an interesting tutorial 
on complicated graphics without Machine Language. 

62 K-Byter 

PICTURES AT AN XIO-BITION 

by David Suwala 

Through ingenious use of the ATARI® 's XIO commands, 
this little gem creates paintings on your screen Mondrian 
would have been proud to sign. 

04 Enhanced Disk Version 

MENU PLUS by Paul Marentette 
Have you ever wished you could see a menu of your disk 
the moment you booted your system? Well, now it's 
possible, and so are many other extremely convenient 
features with this utility. 



Reviews 

66 SIMULATED COMPUTER Review by 
Craig Chamberlain 

68 MICROSOFT BASIC 

Review by Sheldon Leemon 

./Vrticlc 
73 EXPLORING THE ATARI® FRONTIER 

by Alan J. Zett 

This time we further explore the ATARI® display list. 
Through a detailed example, the author constructs an 
elaborate "Title Page" sequence. 
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53 QUIK FOLIO by Rod Packer 

This compact, extremely well-documented program allows 
the amateur investor to perform a simple analysis of his 
portfolio. 

55 Review 

FIREBIRD Review by Hartley G. Lesser 
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Program 

TUNEIN by WiUiam Morris and John Cope 

A colorful implementation of "Simon Says," this sound 



lO Enhanced Disk Version 

STARBASE GUNNER by David Hillard 
Get ready for fast action in deep space. The enemy is 
attacking at high speed and you are the only one who can 
stop them! 

K-Byter 

PEGBOARD SOLITAIRE by Bernard Harford 
The wood board and golf tees you used to build this game 
in your crafts class are no longer necessary. Put them 
away and play this game classic on your screen. 

Program 

DOTS by Charles E. Wooster 

Remember the pencil and paper game the teacher always 
used to yell at you for playing when you should have been 
studying? Well, here it is on the screen of your micro. 
You can play against your friends or the computer. Watch 
it — no one at SoftSide has beat the computer yet! 

yX Review 

ZBASIC 2.0 Review by Tim Knight 
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A Cause 
Without A Rebel 

by Randal L. Kottwitz 



As the ever greater influx of 
technology and its effects are flooding 
our society, the educational system in 
the U.S. is facing a serious crisis. It is 
caught in a trap between making 
serious and costly overhauls in its very 
core approach to educating our 
children and having to drastically alter 
the way in which it spends its money. It 
faces this dilemma as a disenchanted 
public cheers the government's deep 
paring of educational budgets. The 
editorial staff of SoftSide also found 
themselves somewhat disenchanted as 
they explored the subject matter for 
this issue — Computer Awareness In 
Education. Our disenchantment came 
not from the lack of available informa- 
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tion, for it seems to abound in the 
pages of every type of publication con- 
sidering the microcomputer field, but 
from the lack of focus from which that 
information is suffering. 

Mention the subject of computer 
education in almost any polite conver- 
sation today, and there will be more 
than a murmur of positive support and 
even a few "It's about time they did 
something practical! "s. (There is a 
small organization being formed in 
California which would strongly 
disagree, but their approach to pro- 
hibiting computer education, consider- 
ing the current state of society, is 
almost laughable.) But, get into a 
discussion of the methods by which 
such education should be im- 
plemented, and you'll find yourself in 
a bees' nest of disagreement and confu- 
sion. Indeed, the parents being faced 
with the issue find themselves con- 
fronting alterations in not only the 
method by which the "traditional" 
subjects are being taught, but a drastic 
change in the subject matter as well. 
Regrettably, the change is so dramatic, 
many teachers find themselves in a 
similar state of affairs. It's under- 
standable that both parents and 
teachers who are products of an era in 
which the computer became "Big 
Brother" to us all, are somewhat con- 
fused. They must try to differentiate 
the positive effects of a teaching com- 
puter and the negative distraction the 
same machine can become to the study 
of rudimentary essentials if allowed to 
serve only as a game machine. (I herald 
the introduction of the movie, TRON, 
from Disney Studios this summer, but 
question what effects it may have on 
the general public's attitudes towards 
the entertainment side of computing. 
The "Big Brother" we all fear is 
certainly personified in the Encom 
Corporation.) 

I would maintain that the main cause 
of the confusion which plagues com- 
puter awareness in education is the lack 
of a true "clearing house" of informa- 
tion concerning the field. There are 
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many private organizations attempting 
such an effort, some with a modicum 
of success, but the best of such 
organizations, given no governmental 
sanction, finds itself in a perpetual 
capitaHzation crisis. The field is in such 
a rapid state of flux that information 
can easily become outdated in a matter 
of hours, let alone months. In the past, 
the only effective method of estab- 
lishing such a centralized information 
source and guiding light has been 
through government sanction or man- 
date. Educational television 
floundered in a state of disorganization 
until the Public Broadcasting System 
was formed. Only after several years 
under the auspices of a formally 
funded and governmentally endorsed 
organization was the system able to 
become more than a "talking head" 
droning at our children. Now, through 
such projects as the Children's Televi- 
sion Workshop, educational material is 
being presented which fully utilizes the 
possibilities of instructional broad- 
casting. 

The time has come for an organiza- 
tion as extensive as the PBS (I speak of 
it as it was conceived, not as the strug- 
gling organization current budget cuts 
threaten to make it.) be formed to steer 
the production and application of com- 
puter software for the sake of our "na- 
tional education." The US is in great 
danger of falling technologically 
behind the world. Indeed, in some 
fields we are already seriously lagging. 
This is not the time to be deemphasiz- 
ing our former concentration on 
education. One of the main strengths 
which made the United States a contin- 
uing world power has been our concen- 
tration on internal capitalization. We 
must consider computer education, for 
students and the general public alike, 
another form of capitalization — an 
investment in our minds and those of 
our future generations. 
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The unparallelled opportunity to expand your 

skills and knowledge at all levels and areas of 

interest in computer education. 
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OCTOBER 21, 22, 23 and 24, 1982 
LOS ANGELES CONVENTION CENTER 




EXPLORE the largest educational computer showcase ever offered! 

SELECT from more than 350 hours of sessions presented by internationally known speakers from 
across the country who will address, evaluate, analyze, and share the phenomenal 
developments of computers in education. 



GARY BIHER - K-12 Curriculum 

NICK BOHL - Acquisition Funding 

G. R. BOYNTON - University Applications 

HUGH BURNS - Creative Writing 

DAVID BYRUM - Science Education 

JUDY CHAMBERLAIN - Strategies for the Gifted 

SYLVIA CHARP - Past and Future of Micros 

JOHN CHILDS - University Research and tvlanagenrient 

BETTY COSTA - Computerize Your Library 

CHASE CRAWFORD - Managerial Uses 

SANDRA CUNNINGHAM - Elementary School Literacy 

DAN DAVIDSON - Community College Applications 

MARVIN EBBERT - Telecourses in the University 

JUDY EDWARDS-ALLEN - Applying Evaluation Procedures 

BOB ENENSTEIN - Administrative and Classroom Management 

WILLIAM ENGEL - Instructional Computing 

LEROY FINKEL - Business Education 

MARYLYN SUE FORD - K-8 BASIC Programming 

CAROLYN GILBREATH - Support Services for Teachers 

BOBBY GOODSON - Districtwide Training for Literacy 

RICHARD HARTNESS - Hardware for the Blind 

DAN ISAACSON - Courseware Creation 

MAX JERMAN - Program Design 

DEE LAMONT JOHNSON - Spec/a/ Education Software 

ROBERT JUDD - Simulations 

KENT KEHRBERG - MECC's Statewide Plan 



TOM KELLER - Hardware Evaluation and Acquisition 

RONALD LEMOS - Acquisition of Resources 

JOHN LOSSE - Mathematics in Higher Education 

ANDREW MOLNAR - Is Education Keeping Pace? 

DAVID MOURSUND - Computer Literacy Without Computers 

TED PERRY - Authoring Systems 

JIM POIROT - Training the Teacher 

M. D. ROBLYER - Reviewing the Reviewers 

TERRI ROSEGRANT - Reading Readiness/Special Education 

BARBARA SADOWSKI - Software Modification 

ERNEST SAVAGE - Vocational Curriculum 

DAVID SHARPE - Authoring Systems 

GARY SHELLY - Business Education 

TWILA SLESNICK - Policy and Curriculum Trends 

VICKI SMITH - Search for Software 

RANDALL STICKROD - Creative Uses of Graphics 

KATHLEEN SWIGGER - Preschool Software and Research 

JOHN UNDERWOOD - CAI Strategies 

KATHY VOGT - Pascal Workshop 

WILLIAM WAGNER - County Van Project 

GEORGE WATSON - Word Processing 

J. FRED WEAVER - Mathematics CAI 

JERRY WILLIS - Testing and Diagnosis/Special Education 

JAMES WINEBRENER - Educational Software Evaluation 

KARL ZINN - Applied Research in Higher Education 
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PLAYTESTING 

Dear SoftSide, 

A method of alleviating the cost of research 
and development has worked quite well for 
designers of wargames. I wonder if you have 
considered it for polishing and evaluating the 
many submissions you receive. While a wargame 
is still incomplete, the designers send it out to 
various clubs for "blind" playtesting. The clubs 
must respond in a set period of time. Changes are 
made, if appropriate, and a revised game is 
returned. In the end, the designers have a more 
polished product and the playtesters have a free 
copy of it. If the printed program was sent to the 
playtesters, they could develop enhancements to 
it. There would be some problems in the begin- 
ning until you obtain competent playtesters, but 
like the wargame industry, I think you would be 
satisfied in the end. 

Dave Jameson 
Boise, ID 

Editor's Reply: SoftSide has utilized outside 
playtesting resources on a somewhat limited 
basis in the past. However, we are currently plan- 
ning to expand our efforts in that direction with 
specific emphasis on computer clubs and users' 
groups. There are a number of details to be 
tended, such as nondisclosure agreements and 
procedures for verifying the quality of changes 
suggested by playtesters. We have a background 
sheet available. If your group is interested, write 
SoftSide's Editorial Department for more 
details. 

COPY PROTECTION 

Dear SoftSide, 

It is our sincere belief that the microcomputer 
industry will benefit from the most complete ex- 
hange of ideas and information possible, consis- 
tent with the legitimate rights of software pro- 
ducers to adequate compensation. As authors 
and publishers, we recognize and understand the 
arguments for protection; but as users and en- 
thusiasts, we oppose uncopyable and, by their 
nature, unlistable, unmodifiable programs. 

One of the greatest pleasures of owning a per- 
sonal computer comes from learning, and one of 
the best ways to learn is to review and try to 
understand what others have previously done. 
You can customize programs to suit your own 
specific needs or write your own with the 
knowledge gained. This is the way most of the 
early greats in micros learned. However, this is 
impossible when you can't list the program or 
make your own modifications — the learning 
process ends before it begins. Furthermore, a 
great many commercial programs would be 
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much more valuable to the user if modifications 
were possible (not to mention the much discussed 
problem of backing-up valuable, uncopyable 
disks). Locking the program in these instances 
actually makes the program less valuable to the 
user and may even reduce future sales. We 
believe this to be undesirable and that the risks 
involved in "going bare" are outweighed by the 
value to the user and the basic fairness of pro- 
viding quality software which can be listed, 
understood, modified, and legitimately backed- 
up. 

We are not, under any circumstances, condon- 
ing piracy! Duplicating another's copyrighted 
work and distributing it (even for free) without 
his permission is, and should be, illegal. Pirates 
are not romantic heroes; they are thieves who 
should be punished. However, we believe the 
vast majority of users are honest and will pay a 
fair price for good software. We are building our 
company on that belief ...and on faith in our 
customers. 

Although almost all major software producers 
use some form of protection, there have been 
several recent announcements to the contrary. 
Apple's Mike Markkula stated recently that he 
would like to see the elimination of locked soft- 
ware altogether. Also, Mark Pelczarski of 
Penguin Software announced in March 
Penguin's decision to "go unprotected" with 
certain software. We applaud these efforts. It 
takes courage and trust in you, the user. 

Thorne D. Harris III, President 
Superior Software, Inc. 

Editor's Note: The piracy debate goes on. Soft- 
Side feels Superior Software has taken a rational 
approach to the situation and wanted to share 
their comments with you. 



NEW ATARI® USERS' GROUP 

Dear SoftSide, 

I am pleased to announce the formation of an 
ATARI® Users' Group to be known as the Allen- 
town/Bethlehem/Easton ATARI® Computer 
Enthusiasts, or in short — ABE'S ACEs. The 
purpose and direction of the group will be to fur- 
ther members' knowledge of the ATARI® com- 
puter and its programming by holding classes, 
demonstrations and discussion groups. Present 
plans are for the group to meet the first Saturday 
morning of each month. 

For further information, we can be contacted 
at the address below. 



ABE'S ACEs 

J.W. Mendola 

Pres. Pro-Tem 

Green Acres Park, Lot 2-8 

Breinigsville, PA 18031 



RADIO SHACK MODEM I 

Dear SoftSide, 

I must take strong exception to Lance Micklus' 
comments concerning the Radio Shack Mod- 
em I. 

I'm not concerned with the quality of the 
Modem I. I have one, and it has worked perfect- 
ly. I use it for communicating with The Source (a 
local phone call, but a very weak carrier — much 
weaker than Lance's bulletin board, which is a 
long-distance call), and my mainframe at work 
(where I have maintained continuous contact for 
over twelve hours at a time without any prob- 
lems). Please note that the local Radio Shack 
Computer Center must sell the Modem I by 
demonstrating it on a long-distance hook-up to 
CompuServe. If what Lance says was true, they 
wouldn't be selling any. 

My main problem with Lance's comments is 
this: he has not done his homework. He has not 
used a Modem I himself, and his "exploits" in 
the Radio Shack Computer Center hardly qualify 
as scientific research. If people had listened to all 
of the bad press concerning the TRS-80® Model I 
when it first came out (the same type of com- 
ments that Lance repeats in his article to justify 
his position) nobody would own TRS-80® com- 
puters today. People who have problems with 
their equipment make noise. Those who don't 
have problems usually don't say anything. It's 
kind of a "silent majority" situation. I have 
owned my Model I for over two years. During 
that time I have had one failure — the RS-232 
board went up the hill one day, causing the only 
unplanned reboot I've ever experienced. That 
problem was taken care of in a few days, and it 
was covered by the 90-day warranty. 

Lance's trip to the Radio Shack Computer 
Center is a journalistic joke. He only proved that 
one particular Modem I was unable to get a car- 
rier on his bulletin board at that particular time. 
It proved nothing else. Lance didn't try to con- 
nect to the bulletin board using another modem. 
This would have isolated the modem as the only 
variable in the system. But no, when he had the 
result that "justified" his thesis, he stopped his 
research. Maybe the phone line was bad; maybe 
the modem was bad; maybe it was sunspots. In 
any case, we'll never know. I certainly hope that 
Lance doesn't debug his software using this same 
rigorous technique. 

All 1 ask is that you be more careful with your 
articles in the future. We don't need any more 
hearsay, illogic, and innuendo in our hobby than 
we have already. 

Spencer R. Lepley 
Tallahassee, FL 

Lance's Reply: You are justified in feeling that 
my experience at the Radio Shack Computer 
Center in Paramus wasn't fair. I suppose I could 
get a Modem I and run controlled comparison 
tests here in Burlington to see if the results 
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changed. The problem is that I might get a 
Modem I that's really hot, giving me more 
favorable results than normal. 

A far more valid test would be to have several 
thousand people use all of the reviewed modems 
under every imaginable condition. In a manner 
of speaking, this is exactly what I did, since the 
tests were based on the experience of thousands 
of ST80 users. Their experience with Modem I 
was extremely poor when compared to their ex- 
perience with other brands of modems. 

I'm glad to hear that you are having good luck 
with your Modem I and have even been able to 
establish a connection on my own BBS. You'll be 
glad to hear that although I smoke more than 
two packs of cigarettes a day, I have not suffered 
from cancer, heart disease, or death. I still 
think the Modem / is a very poorly designed 
device and that smoking is bad for your health — 
in spite of the fact that your personal experience 
with the Modem I and my personal experience 
with cigarettes do not support either of these 
conclusions. 

Editor's Note: For further comments from 
Lance concerning the Modem I, see My Side of 
the Page, later in this issue. 

TRS-80® MODEL I JOYSTICK 

Dear SoftSide, 

Many, many thanks to you and Tigre Wenrich 
for your May, 1982, article. Joystick Modifica- 
tion for the TRS-80'^. I have installed the 
ATARI® joystick on my TRS-80® Model 1 and it 
has really brought new life to many of my game 
programs. Long have I wanted a joystick, and 
now I can enjoy arcade-type games with authen- 
tic arcade style. 

1 would like to let any Model 1 owners know, 
however, that the installation is ever so slighly 
different than Mr. Wenrich described for the 
Model III. But first, let me assure anyone who is 
concerned about the "open-board surgery." 1 
have absolutely no background in electronics and 
for years 1 have shuddered at the thought of 
opening my computer and dabbling around its 
innards. But, the thought of a joystick for an in- 
vestment of only $10 was enough to get me to 
try. 1 can say, from experience, that if you can 
hold a soldering iron steady, the job will be a 
simple affair. 

The biggest problem I encountered is that the 
positive and ground solder points are not marked 
on the PC board. A little trial and error set me 
straight. To begin, remove the six screws and 
turn the keyboard upright again. Now, lift off 
the cover, lift the top PC board, and fold it for- 
ward. The underside of the keyboard is now in 
front of you and, if you can read letters upside 
down, you will see each set of solder tips is clear- 
ly marked. For each key, there are two solder 
points, one above the other on a slight diagonal. 
The positive is always the lower, left point. To 
this point, you should solder the corresponding 
wire from the joystick. If you have a numeric 
keypad, you will see that Radio Shack installed it 
in the exact same manner. One last point which 
was misleading in the article: the black wire can- 
not go to any negative post as Mr. Wenrich 
stated. I believe he meant any negative post of 
one of the keys to which you have connected 
another joystick wire. At first, I used the same 
post that Radio Shack used for the numeric 
keypad, and nothing worked. 

If you want a more professional look, and do 
not want the joystick permanently attached to 
your computer, an additional investment of $3 
would help. I bought a male and female DIN 
plug, similar to the plugs already on the back of 
the unit. It has five pins and a ground, perfect 
for this application. I used Radio Shack Part 
Numbers 274-003 and 274-006 (to keep it in the 
family). I have the female socket sticking out the 



expansion port opening about three inches and 
the male plug wired to the joystick. This added 
about twenty minutes to the job. Although I am 
getting no commission from Tandy for saying so, 
the $3 is a small investment for the ability to 
detach the joystick whenever it is not needed. 

So, if you read the article and drooled over the 
prospect of having a joystick, by all means, go 
ahead! If I can do it, anyone can. Thanks again 
to Tigre and your great magazine. 

Robert M. Rosenfield 
Warwick, RI 



OUTPUT 

by Randal L. Kottwitz 



In this and future issues of SoftSide, you'll 
find comments concerning the "inner workings" 
of SoftSide, formerly contained in Outgoing 
Mail, here in Output. 



In any marketplace containing a large number 
of products, each attempting to carry a unique 
title, confusion is likely to abound. Such is the 
state of affairs in the entertainment software 
field. There are some blatant attempts at close 
emulation of titles in order to grab a portion of 
the same marketplace, but in most cases, the con- 
fusion is purely accidental. Such seems to be the 
case with a product reviewed by Bruce Chapman 
in the May SoftSide. Bruce gave rather un- 
favorable comments to an ATARI® program en- 
titled Forest Fire (part of a package called Out- 
door Games). Shortly after the issue was mailed, 
SoftSide received a letter and disk from Arthur 
M. Walsh of Artworx Software, stating that Art- 
worx publishes a program. Forest Fire, for the 
ATARI® which does not have the faults we men- 
tioned in our review. We checked the disk, and 
although the two programs certainly are similar 
in concept, the Artworx Forest Fire is much bet- 
ter implemented. Mr. Walsh also informed us 
that Artworx is about to issue an enhanced ver- 
sion of the game to be titled Forest Fire 2. One 
must wonder what the plans are of the publisher 
of the other Forest Fire. The impact of this sort 
of confusion on a single title is minor — it does, 
however, point up something of which software 
authors should be aware. Name your program as 
carefully as you would a book. It may show up in 
a computer store window in your neighborhood. 

We've had a bit of confusion over the proper 
address for correspondence with SoftSide. You'll 
note several changes in the "masthead" on the 
table of contents page this month. One is that all 
editorial and advertising correspondence should 
be directed to our offices in New Hampshire. 
This should also include any specific questions 
concerning articles, programs and computing. 
The address listed in Pennsylvania is for the 
subscription fulfillment house which handles all 
of our subscriptions, product orders, back 
issues, and customer service. Sorry to say, they 
won't be able to tell you how much memory a 
program requires or what DOS is required to run 
a SoftSide disk. 



That's all for this month. Enjoy issue #31, it 
should give your gray matter a good workout. 
Until next month — Happy Hacking! Q 

SoftSide 




SELL YOUR 
PROGRAM 

AND KEEP 
IT TOO! 

One of the nicest things 
about selling your program 
to SoftSide is that it's still 
your program after we buy 
it. Actually, what we are 
buying is the right to 
publish your program once 
in our magazine ancj on 
subscription (jisk and tape. 
This is what we call "one- 
time rights." Three months 
after your program ap- 
pears In SoftSide, you are 
free to sell it again to 
anyone. And, now that it's 
been published, your pro- 
gram is worth more. So 
send today for a copy of 
our free author's guide and 
find out how you can sell 
your program and keep it 
too. 

Write to: 

SoftSide Publications 

Dept AG1 

6 South Street 

Milford, NH 03055 



HINTS & ENHANCEMENTS 




ATARI® Cross Reference 

Here's an improvement for the excellent 
program in your recent SoftSide, May 1982, 
Pg. 62 — ATARI® Cross Reference. The 
program cannot process a statement such 
as: 

10 P$ = "" 

Such statements generate an Error 5 at 
Line 3050. I have found that the following 
changes correct the problem: 

1008 IF ASC(REG$(LAST)) = 34 THEN 

GOSUB 3050 

3020 IF ASC(POS$(H,H)) = 34 THEN 3050 

I hope this proves useful to SoftSide's 
readers. 

Lee Hopkins 
Sacramento, CA 

Printout Using The ATARI® 850 Interface 

Our thanks to reader Jeffrey Kerner of 
Woodlands, TX, for the following infor- 
mation. It pertains to ATARI® programs 
which use the LPRINT statement, such as 
Microtext and Banner Machine. 

When using the 850 Interface with a 
printer, an LPRINT line which ends with a 
semicolon apparently causes the ATARI® 
to pad the line with as many as 40 spaces. 
An alternate approach that doesn't have 
this problem is to open an lOCB for the 
printer and then print to that lOCB 
number. The lines listed below are Mr. 
Kerner' s modifications to Microtext, which 
illustrate the technique. 



5 6RAPHICS 0:POKE 764,255:P0KE 709, 4:P 

OKE 710,15:RE« TO REDUCE EYE STRAIN 

20 OPEN 17,8,0, "P:" 

200 POSITION 2,0!? '^SflVE -^LOAD -^REVIE 

H -^EDIT -^PRINT -^QUIT" 

7070 ? CL$!? I7!"':P*="':CR=0!I=0 

7130 ? i7,-S»(l,LH);L»i 

7150 ? t7i" 

7590 ? t7;S$(l,L«)iPP»; 
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7610 FOR J=l TO LS!LIN=LIN+l!? I7;"!H 
EXT J 

7615 IF LIN.>59 THEN FOR J=l TO 66-LIN: 
? #7;"":NE1!T J:LIN=0 

TRS-80® LADDERS 

Rik Pierce, the author of LADDERS 
(SoftSide, May, 1982) has sent us a substan- 
tial enhancement to his program which 
allows one or more human players to play 
against one or more computer opponents. 

Variables 

HP: Number of human players 
NP: Current player number 
S{l-2): Value of pairs of dice 
DT(l-4): Value of each die 
DS(l-6): Values of all possible pairs 

V and VI: Value of chosen dice 
FM: Flag for marker checks possible 
move 

M: Number of markers on board 
V(2-12): Available ladders 

= available 1 = your mark 

2 = unavailable 
Rl(2-12): Number of rungs on each ladder 
L ( NP , MX(X) , U ) 
( player , ladder , rung ) 
This keeps track of who is where 
P(M(X),Y): Board location to print 
marker 

Z(X): Computer choice 
S$: Holds sound information for 
K = USR(0) 

300 PD=12l!P0=896:PB=30!PL=2B2!P«=PL+388 

320 'VARIOUSTEBP 

325 NT»(l)="HEflD 0N"!NT»(2)="DEVI0US':NT 

t(3)="0FF THE HALL"! NTt(4)="SCATTER BRA 

IN" 

900 S»=B2«!PRINTaO,CS:PRINT8384,"HOH HAN 

Y HUMAN FLAYERS?": B=USR(0) 

920 60SUB3440:HP=VAL(A*):IFHP<10RHP>4THE 
N920 

955 F0R1(=1TDHP 

960 IFS»=SltTHENS»=S2tELSES«=SU 
965 PRINT8384,CS;"NAHE OF PLAYER"X5jB=US 
SoftSide 



R(0)! INPUT N$(X) 

970 NEXT 

975 PRINT33e4,'H0« HANY COHPUTER OPPONEN 

TS? TO 'i4-HP 

980 G0SUB3440:TP=VAL(A«)+HP:IFTP,>4rHEM98 


981 IFTP=HPTHEN1020 

985 PRINT3384,CS"CH00SE YOUR OPPONENTS: 

1 'NT*(1): PRINT"2 "NTK 

2)!PR!NT "3 "NT$(3): PRINT "4 ,. 

"NTt(4) 

990 F0RX=HP+1T0TP 

995 G0SUB3440:P=-VAL(At):IFP<10RP>4THEN99 

5 

1000 PRINTNT»(F) 

1005 N«(X)=NT«(P)jFL(X)=X 

1010 NEXTX 

1015 F0RTIH=1T01000:NEXT 

1390 lFN*(NP)=NT«a)THE«2(l)=2!Z(2)=12!Z 

(3)=8:Z!4)=6:Z(5)=7 

1392 IFN»(NP)=NT«(2)THENZ(1)=8!Z(2)=6:Z( 

3)=7!Z(4)=2!Z(5)=12 

1394 IFN«(NP)=NTt(3)THENZ(l)=3!Z(2)=9!Z( 

3)=10:Z(4)=4!2(5)=5 

1396 IFN*(NP)=NT»(4)THENZ(1)=RND(4)+1:Z( 

2)=RND(4)+RND(4)!Z(3)=RND(3)+RND(3)+RND( 

4)!Z(4)=12-RND(4):Z(5)=RND(11)+1 

1850 IFFL(NP)THEN2800 

2450 IFFL<NP)THEN2920 

2680 IFL(NP,(1(X),R1(H(X)))=NPTHEN i((NP)= 

«(NP)+l!LD=LD+N(X): IFH(X)>7THEN D=LD-(!1 

(X)-7)«2 ' SKEWS COMPUTER PLAY WHEN TOP 

OF LADDER REACHED 

2800 ' COMPUTER PLAYS 

2810 V=0:V1=0 

2811 IFLD<15THEN2820 
2820 F0RZ=1T05 

2830 FORX=1T03:FORY=X+1T04 

2840 IFDT(XH-DT(Y)=Z(Z)THENIFV(Z(Z1)<2TH 

ENV=X!V1=Y 

2850 NEXTZ,Y,X 

2855 IFVTHEN2890 

2860 V=RND(41 



2870 V1=RND(4):IFV1=VTHEN2870 
2880 IFV(DT(V)+DT(V1))>1THEM2860 
2890 PRINTJPO,CS" 

"N$<NP)" CHOOSES — 



-> 



2900 PRINTCHR«(27)D«(DT<V));" AND "jsFOR 

TI«=1T0700:NEXT 

2910 PRINTCHR«(27);!G0T01980 

2920 IF«<3THENP1=100-LDjG0T02985 

2930 P1=0!N=0:F0RX=1T03:N=N(X) 

2940 IFV(N)=2THEN2970 

2950 IF«()()>7THENN=M(l()-<N()()-7)t2 

2960 P1=P1+N 

2970 NEUX 

2980 Pl=(Pl-5)t7-LD«2-TC»3 

2985 PRINT*P0,CS,;:IFFL(NP)=2THEN1FP1<60 

THEN2998ELSE2995 

2990 IFRND(90)>P1THEN2998 

2995 TC=TC+l!PRINT8P0,CS;N$«<NP)" CONTIN 

UES';:60T01A00 

2998 TC=0!PRINT8P0,CS;N»(NP)" QUITS HERE 
";:eOT02520 

2999 STOP 

3000 PRINTJPO.CS" t* I N N E R II 
I "N«(NP)" III WINNER' 

Apple^"*^ Format Subroutine 

Here's a very short subroutine for the 
Apple^*^ computer which converts any 
number to a proper "dollar" format. The 
way the Apple^"^ is designed, any un- 
necessary zeros to the right of the decimal 
point are omitted. However, when worthing 
with reports, budgets, or anything where a 
dollar format is required, it is often 
desirable to have figures printed out in a 
consistent format with two decimal places. 
The following subroutine will make the 
necessary conversion. 

To use the routine, simply set the variable 
Yl equal to the number you wish to adjust, 
then go to the subroutine. The adjusted 
number is printed as the variable Yl$. Here 
is an example: 

80 REM SUBROUTINE TO PUT NUNBERS 

INTO » 0.00 FORHAT 

81 Yl = INT (Yl I 100 + .5) / 10 

0:Y1» = STR» (Y1):L1 = LEH 

(YU): IF LI = 1 THEN 60T0 

85 

IF HID$ (Y1»,L1 - 1,1) = ■." 
THEN Yl« = Yl» + 'O'i GOTO 

86 

IF LI < 3 THEN 60T0 85 
IF HIM (Y1»,L1 - 2,1) = '.■ 

THEN 6DTD 86 

85 Yl* = Ylt + ".00" 

86 RETURN 



I hope this can be useful to other readers. 

David Marshall 
Champaign, IL Q 
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How would you like 




Each month SoftSide publishes a translation of a program from a 
previous issue. Since the Translation of the Month has been so well 
received, we're offering an even greater incentive than ever before to 
those of you who put the necessary effort into producing a good transla- 
tion for one of the other computer systems we support. 

A one-year subscription to the Disk Version of SoftSide, or an 
eighteen-month subscription to the Cassette Version is the incentive. 
That's a value of $125 for the disk subscription, or $112.50 for the 
cassette subscription; a handsome reward for a winning translation. 

What do we look for in a translation contest winner? Here are some of 
the most important qualifications: 

■ Your entry should be a translation of one of the main programs from a 
past issue. K-Byters, One-Liners, and other short programs don't qualify 
ifor this contest. (We will, however, consider translations of shorter pro- 
grams in their own right, especially if they contain unique features or 
enhancements.) In general, we are looking for translations of programs 
which are a CHALLENGE to translate. Some of the listings we publish 
are written in more or less "generic" BASIC, which can be typed into 
another computer with few changes. Although these require the least ef- 
fort to translate, they are also the least likely prospects for Translation 
Contest winners. We'd much rather see translations which require con- 
siderable creativity and ingenuity to rewrite and adapt. 

■ Your translation should be thoroughly tested and completely bug- 
free. Just converting program lines doesn't automatically ensure a 
workable translation. Be sure to use-test your translation as carefully as 
you would test a program you had written entirely from scratch. 

■ Your translation should take advantage of the unique features of the 
computer for which it is written. The objective of a translation is not to 
simply duplicate the operation of the original program in a mechanical 
way. Rather, the translation should be written in such a way that it "fits" 
the capabilities and conventions of its host computer. This is especially 
true of programs which use graphics, and should be kept in mind for 
such minor things as keyboard layout' as well (use of such special keys 
as arrows, ESC, CTRL, CLEAR, etc.). Also be careful with screen for- 
matting; a word that spills over into the next line, because of a PRINT 
statement that wasn't properly rewritten, betrays such carelessness that 
we'll probably reject your translation automatically. 

■ Your entry should incorporate any improvements and enhancements 
that you can add to make it an even better program. Don't feel that you 
have to limit yourself to the boundaries of the original. (On the other 
hand, don't go overboard and destroy the character of the original by 
completely rewriting it!) An enhanced translation is much more likely to 
catch our attention than a line-for-line duplicate, and it will have more 
value to our readers. 

It's not necessary to include the kind of extensive documentation with 
your translation that we require of original programs. If most of the 
originally published documentation applies to your translation, simply 
say so. You should, however, for the benefit and interest of other pro- 
grammers, include descriptions and explanations of any changes or 
enhancements you've made. 

All Translation Contest entries must be submitted on disk or tape, 
with documentation in printed or typed form. Media will be returned only 
if accompanied by a self-addressed, stamped envelope. 
Send to: SoftSide Translation Contest 

6 South Street 
Milford, NH 03055 
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Bugs, 

Worms, 

and 

other 

Undesirables 

There is a bug in all three ver- 
sions of Solitaire. May, 1982 
which keeps the first card in the 
deck from being shuffled with the 
rest. Change line 1230 to read as 
shown to correct this. 

Apple^"^ Version 

1230 FOR I = 51 TO STEP - IsX 
= INT ( RND (1) X (I + D) 
iT = D()()iD(X) = D(I)!D(I) = 
T! NEXT 

ATARI® Version 

1230 FOR 1=51 TO STEP -l!)(=INT(RN 
D(0)t(I+l)):T=D(l()iD(X)=D(I)!D(I)=T 
sNEXT I 

TRS-80® Version 

1230 FORI=51TO0STEP-l!:<=INT(RND(0)t 
(I+l)):T=D()()!D(.X)=I)(I):D(I)=T:NEn 

In the Apple translation of 
Micro-Man (May, 1982), running 
over an energizer ($) does not add 
the point value of the energizer to 
the player's score. This can be 
corrected by adding the following 
Une. 

607 IF PK = 100 THEN SCR = 
SCR -1- 50 



BUY! SELL! TRADE! 

COMPUTER & HAM EQUIPMENT 

r COMPUTER' 



I TRADER 

PERMANENT 
SUBSCRIPTION 

$10.00 

Low Ad Rates — Mailed Monthly 
COMPUTER TRADER* 

Chet Lambert, W4WDR 

1704 Sam Drive • Birmingham, AL 35235 

(205) 854-0271 

Please include your Name, Address, Call Sign or Phone Number 




August 1-4 

Microcomputer Applications In 

Education Workshop 

Cloud's Gal-Neva, Lake Tahoe, NV 

The University of Nevada — Reno 
Division of Continuing Education 
and the Washoe County School 
District will sponsor this work- 
shop for school teachers and 
administrators. 

Contact: Shirley Beck, Division of 
Continuing Education, Reno, NV 
89557. 
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August 12-13 

Microcomputers in Vocational 
Education Conference 
Sheraton Inn, Madison, WI 

This conference, for all persons in- 
terested in microcomputer appHca- 
tions to vocational education pro- 
grams, will provide access to both 
computer information for beginners 
and to more advanced applications of 
software programs for vocational 
education curricula. A handbook, 
distributed to conference participants, 
may also be purchased separately 
($20) by those unable to attend. 
Contact: Judy Rodenstein or Roger 
Lambert, Vocational Studies Center, 
964 Educational Sciences Building, 
1025 West Johnson Street, Madison, 
WI 53706. 

SoftSide 



August 18-20 

The National Conference on Artificial 

Intelligence 

Carnegie-Mellon University — 

University of Pittsburgh, Pittsburgh, 

PA 

The conference will present a 
perspective on contemporary artificial 
intelligence research in the U.S.. In- 
vited speakers and panelists will iden- 
tify the scope and future of AI in this 
country and abroad. During a two- 
day tutorial program, August 16-17, 
leaders in AI research will give de- 
tailed presentations of main-stream 
themes in the field. A five-day exhibit 
program, August 16-20, will feature 
the latest in software and hardware of 
interest to the AI research communi- 
ty, and publishers will exhibit a varie- 
ty of titles in AI and allied disci- 
plines. 

Contact: AAAI, 445 Burgess Drive, 
Menlo Park, CA 94025. 



August 21 

The Third Annual Apple™ Fair 

New York University, New York, NY 

The Big Apple Users Group of 
New York will sponsor this fair, 
which will stress both business and 
leisure applications of Apple^"^ hard- 
ware and software. 

The program will include general 
business application classes and lec- 
tures in pre-packaged software, as 
well as lectures and "hands-on" ac- 
tivities in the realm of graphics, 
games, and education. 
Admission is free. 
Contact: Barbara McMuUen, (914) 
245-2734. 



If you or your organization are 
sponsoring or know of an event you 
think would be of interest to SoftSide 
readers, please send complete infor- 
mation, at least three months in ad- 
vance, to: 

SoftSide Publications 
Calendar Editor 
6 South Street 
Milford, NH 03055 

Be sure to include complete infor- 
mation concerning dates, location, 
subject matter and a contact name, 
address, and phone number. 

© 
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Motion Graphics For 
Tlie 21st Century 

by Fred D'Ignazio and Allen L. Wold 



John Whitney, Jr. is an expert at 
mailing computer movies that are col- 
orful and realistic. He is a computer 
pioneer with startling ideas about com- 
puters of the future. For the last fifteen 
years, Whitney and his father, in- 
dependently, have been using com- 
puters to create special effects for TV 
programs, commercials, and popular 
movies such as Star Wars, 2001: A 
Space Odyssey, and Superman. 

Whitney recently started his own 
film company, with the help of his 
partner of many years, Gary Demos. 
Demos is a computer hardware wizard, 
and he and Whitney are building a 
machine so powerful they call it a 
"nuclear power plant" computer. 
When it is finished, it will generate pic- 
tures that are so realistic, they will be 
indistinguishable from a movie's live 
photographic portions. Whitney feels 
that computer generated movies will be 
one of the main sources of entertain- 
ment in the future. These movies will 
go far beyond the special effects that 
today's computers create. 

Most computer special effects today 
are used in TV commercials, cartoons, 
and science fiction/horror films. 
Whitney and Demos want to create 
computer effects for use in TV 
documentaries — tours through outer 
space and the microscopic world of the 
atom. They think their computer will 
be able to create actors and scenes for 
realistic and fantasy films alike. A 
computer that can draw people, atoms, 
and planets that look real must become 
more artistic than those in use today. 
Whitney plans to build a computer 
modeled after the talents of the great 
artist, Leonardo da Vinci. 

Leonardo da Vinci had a gigantic 
thirst to learn how the world works. 
For example, instead of reading other 
people's accounts of the way organs 
functioned inside the human body, da 
Vinci cut up cadavers and made draw- 



ings of what he saw. During his life, as 
he learned more about the world, da 
Vinci's drawings became more lifelike 
and dynamic. For example, his draw- 
ings of birds and imaginary airplanes 
are based on his study of bird wings 
during long hours watching birds in 
flight. Da Vinci could draw the world 
in motion because he understood how 
the world worked. 




John Whitney wants to build a com- 
puter that works on the same principle. 
First, Whitney will create a huge "ex- 
perimental database" for the computer 
to access — an automated library of 
the real world. Then, when Whitney 
asks his computer to create a scene of 
violent weather, it won't just recall a 
"canned" cloud cartoon and make it 
move. Instead, the computer will 
SoftSide 



search its memory for characteristics of 
real weather — its physics, dynamics, 
chemistry, and optical characteristics. 
Based on that knowledge, the com- 
puter will create mathematical models 
of dark, rumbling thunderheads, a 
jagged plexus of flashing lightning, 
and gusting sheets of wind-driven rain. 
It will then translate these models into 
three-dimensional images moving 
across the screen. 

Whitney feels that his "da Vinci" 
computer will revolutionize the motion 
picture business in the 1980's and 90's. 
He and Demos, he says, are working 
on "motion graphics for the 21st 
century." 

The Computer As Creator 

Whitney has other ideas that are 
even more extraordinary. He won't be 
satisfied with an artistic computer that 
can create simulated creatures and 
events. He wants his computer to learn 
how to create real creatures and events, 
and then breathe life into them. He 
wants the computer's swirling 
thunderstorm, its ferocious dinosaur, 
or its medieval French knight to act as 
if they are truly alive. Once they 
possess that life they will no longer be 
mere images on a movie screen. In- 
stead, they will act unpredictably, just 
as they would in real life. 

Just think of a movie filled with 
dozens or hundreds of creatures, 
scenes, and events that are dynamic, 
fresh, and unpredictable. This movie 
would be more frightening and en- 
chanting than any we've ever seen. It 
would capture us and carry us away to 
the world inside the movie, a world in 
which these creations really lived. 
Someday, Whitney plans to create 
"Disney world" electronic amusement 
parks, inhabited by intelligent, lifelike 
aliens, monsters, human heroes and 
villains — all created by a computer. 
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He foresees a computer fantasy- 
game "Olympics" broadcast via 
satellite to a world-wide audience. Peo- 
ple will watch on their computerized 
TVs as electronic "gladiators" from 
each nation put on wired helmets and 
are transported into a dangerous world 
of fantasy, invented by the computer. 



A New Form of Life 

We are witnessing the dawn of a new 
era, the birth of a new species of life, 
one which will be strange and exotic. It 
won't have flesh, blood or bones. Its 
body will be made from silicon 
crystals, plastic, and metal. In a 
primitive state, this new life form 
already exists. It is the computer. 

But how could that be? Compared to 
human beings, today's computers are 
like cave-dwelling savages. They have 
only limited intelligence, and their 
senses are rudimentary — on the level 
of an earwig or a turtle. But, we need 
to recall that human beings, in a time- 
relative sense, have a huge head start 
on computers. Humans have been 
evolving for billions of years. Com- 
puters have been around for less than 
forty. Also, humans are evolving at the 
pace of a snail. In comparison, com- 
puters are progressing at the speed of a 
jack rabbit. 

The first computers were giant 
"dinosaurs," nurtured and sheltered in 
scientists' labs. They were heavy, 
massive, and dim-witted — good at 
arithmetic, but miserable at almost 
everything else. Today, millions of 
computers are appearing in thousands 
of forms, all over the world. They are 
faster than their "ancestors," far more 
rugged, and far more intelligent. They 
see. They talk. Some are even learning 
how to walk. They are taking their 
first, halting steps, just like a human 
baby. Perhaps that's the way to view 
computers — as babies. And we, the 
human beings, are their parents. It is 
our job to teach them about themselves 
and the world, and to help them grow. 



John Whitney is just one of a large 
number of respected computer scien- 
tists who share this view. In the opin- 
ion of many, by creating the computer, 
we have not just invented another 
gadget or machine. Instead, we have 
given birth to a new form of life. The 
real issue facing society, then, is not ar- 
tificial intelligence, it is artificial life. 
According to Whitney: 
"Whether we like it or not, mankind's 
child is the computer. This is an in- 
evitable process that can no longer be 
stopped. Maybe this is the purpose of 
all biological life: to give rise to the 
next form of life. ' ' 

Digital Moviemaking 

What does artificial life have to do 
with movies? More than you might 
think. Movies are undergoing rapid 
and fundamental changes. In a few, 
short years they will become a form of 
entertainment totally unlike what we 
know today. 

From the beginning, movies have 
been created from film — individual 
photographs chained together on a 
strip of celluloid, flying by on a picture 
screen to give the illusion of movement 
and Hfe. Now, filmmakers are ex- 
perimenting with digital movies — mo- 
tion pictures created and stored elec- 
tronically on a computer. Film is either 
unnecessary or created only in the final 
step, to allow projection on standard- 
ized theatre equipment. 

Famed movie director, Francis Ford 
Coppola, of Zoetrope Studios, is 
working with Japanese and American 
computer and video manufacturers to 
develop a director's digital worksta- 
tion. According to Coppola, a director 
will be able to sit at his computer-based 
workstation and create complete sec- 
tions of a new movie, simultaneously 
displaying and manipulating as many 
as 1000 small video images. The direc- 
tor will operate various buttons, dials, 
light pens, and touch-sensitive screens 
to create, edit, cut and paste together 
live scenes, animation, special effects. 
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and a digitized soundtrack, all called 
up from the computer's memory 
storage. 

Coppola's workstation is just the 
beginning. Once filmmaking is digit- 
ized and transferred to computers, 
directors will no longer spend most of 
their time on Hollywood sets or on 
location around the world. Instead, 
they will sit in front of a computer, 
manipulating trillions of bits of visual 
and aural data to shape a new movie. 

Digital filmmaking will give direc- 
tors new freedom. As Coppola says, 
"The display is your imagination." 
Physical limitations — sets, props, ac- 
tors, budgets — will cease to be major 
constraints on a director's creativity. 
The ideal film could be within his 
grasp. 

Interactive Multi-Movies 

Movies may soon be produced dif- 
ferently, but, will they look any dif- 
ferent to the average movie-goer? 
What will the movie theatres of the 
future be like? 

Imagine entering a movie theatre ten 
years from now: You receive a pair of 
small, plastic goggles, to make the 
movie appear to be in 3-D, much like 
the 3-D movies of the 1950's, but of 
much higher quality. The computer 
transforms a digitized movie from two 
to three dimensions at almost no extra 
cost. 

You choose Theatre A, where the 
new Intelligent Movies (IMs) are 
shown. The lights dim. Your chair 
becomes transparent. All four walls, 
the ceiling, and the floor become a 
single, enormous screen. No projec- 
tionist or projector is required. The 
flat, scuff-proof panels underneath 
and around you display colorful, high- 
resolution pictures without them. They 
are under the control of a powerful 
minicomputer located in the theatre's 
video control room. The minicomputer 
produces the displays at high speed in 
rotating, 360 degree arcs. 

The movie begins. But you aren't 
watching the movie. You are in it! 
With a shock, you jerk back into your 
padded seat. You are at the Grand 
Canyon, perched on its ragged lip. The 
mouth of the canyon gapes fantastical- 
ly wide before and beneath you. It 
threatens to swallow you like a speck 
of dust. You look up. The sky 
overhead is a deep blue. You feel 
suspended in mid-air, infinitely small. 
You can see dozens of m\\es m all 
directions. A thunderstorm ap- 
proaches, and down below, you see a 
small party of backpackers hastening 
up the trail on the side of the canyon, 
trying to sprint ahead of the rain. 
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You saw this same movie last night, 
but it was completely different. It was 
raining when the movie started. You 
were on the canyon floor. High 
overhead, a bolt of lightning lanced 
out of the sky and tore off a section of 
the chff. Boulders the size of houses 
clattered and crashed around you. 

You relax, sit back in your seat, and 
smile. No wonder it's different — this 
is an IM, an Intelligent Movie. You 
could see it every night for a month, 
and each night it would be different. 
The various scenes and plots would 
change, as would the characters. Most 
importantly, the action would be 
unique every time you saw it. The dif- 
ferences would be totally unpredic- 
table. 

Huge numbers of plot parameters 
are under control of the computer. 
Each night, the computer varies those 
parameters randomly within certain 
limits. Those limits keep the plot 
realistic and dramatic. Otherwise, the 
computer's changes might be choppy, 
discontinuous or distasteful. Em- 
bedded in the computer's complex, 
ROM-based software are the key 
elements of the moviemaker's craft, 
mined from the most brilliant directors 
in the world. 

All three theatres are showing multi- 
movies. But, Theatre B is showing 
multiple movies simultaneously, a 
Viewer-Controlled Movie (VCM). You 
are seated in a soft, padded seat. The 
armrests are miniature control panels, 
studded with buttons, dials, and small 
screens. You pick up a "video head- 
phone" on the corner of the armrest 
and fit it over your eyes and ears. Now 
you are wired to the movie, and it is 
wired to you. 

The movie begins the same for 
everyone. Soon, however, twenty or 
thirty different movies are running 
simultaneously. You and the other 
people in the audience are creating the 
movies, on the fly, and watching them 
on the miniature, stereoscopic, 3-D 
video screens wrapped Hke doughnuts 
around your heads. 

When a movie "plot branch" oc- 
curs, you are notified by a blinking red 
light in the corner of your peripheral 
vision. You can flick a switch and 
choose which direction you want the 
plot to go (a menu flashes before you), 
or you can do nothing, and the movie 
takes a default branch and continues 
with no interruptions. At any time dur- 
ing the movie, you can switch to 
anyone else's personal movie in the 
theatre. You don't know whose movie 
it is, but, you can casually peek into the 
other people's movies, browse and 
loiter, watch the whole thing, or zip 
back to your own. 



You can also freeze your movie, run 
it backwards, or jump to the end, the 
beginning, or the middle. After it is all 
over, you can play the role of a movie 
critic. You can "can" it, if it was 
miserable, or give it high marks if it 
was good. The computer stores your 
movie and assigns you a private 
"Movie ID Number" so you can 
return and watch your personal movie 
again on another night. The movie will 
remain stored for a full year in the 
computer's private movie library and 
be available to you on recall or for pur- 
chase or lease for your own home video 
system. 

Theatre C is showing a Consensus 
Movie (CM). As in Theatre A, the 
audience only watches one movie at a 
time. But this time, instead of one 
screen, there is a large screen on the far 
wall, complemented by several smaller 
screens, scattered throughout the 
room. As in Theatre B, you plug 
yourself in and your seat is surrounded 
with controls. But, this time you don't 
choose the plot on your own, you do it 
with the majority of your fellow 
viewers — by consensus. Votes are 
taken at the beginning and at key 
points during the movie. Whatever the 
majority of the viewers would like to 
see is what is shown. 

However, you can still exercise in- 
dividual creativity. Depending on what 



seat you chose, you get to control 
one of the small, border screens sur- 
rounding the main screen or located 
elsewhere in the room. As a "scene 
editor," you can choose from a hun- 
dred different perspectives — zoom, 
close-up, panoramic, character shot, 
text, abstract, etc. — to flash on the 
smaller screen. The majority of the 
audience has chosen the main feature 
and its branches, but you can em- 
broider its edges with exciting images. 
You might see the movie in any 
theatre — A, B, or C — several nights 
in a row. You would see a different 
movie each night, governed by your 
choices and those of your fellow 
viewers. 



The Technology Beneath The Magic 

We have explored some of the ex- 
citing possibiUties for movies in the 
near future. So far, we've looked only 
at the magic and not the technology 
which supports it. In the next two 
episodes of Entertainment Tomorrow, 
we will examine the technology that 
will be used in future movies. We will 
see some of the new developments in 
computer graphics and computer 
animation that will make it possible to 
realize movies and movie theatres like 
those we've just envisioned. O 
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My Side 
of the Page 

By Lance Micklus 



It looks like some SoftSide readers with Radio Shack 
Modem I's did not agree with my evaluation in April. 
Several of you called my own MOUSE-NET^'^ system to 
check it out with your own Modem I's and to say that 
everything worked perfectly. One caller, Pat Tancreti, was 
using ST80-III, so MOUSE-NET™ was able to test the con- 
nection automatically and include the results in the user log. 
Since the other callers were using older STSO^'^'s or some 
other terminal program, MOUSE-NET™ could not do the 
automatic test for telephone reliability. It entered their 
telephone line reliability as even though it obviously could 
not be so. The messages they left follow with their location 
after their name in parentheses: 



To: Lance Micklus 

From: Ric Krasch (Rialto, CA) 

Date: 4/10 

Time: 10:52 

"Lance, as ever, your article in SoftSide is fantastic. 
However, I, being curious, am trying out my new Modem I. 
It seems to get thru OK, even from California! And twice! 
Just thought I would let you know the results.... Every thing 
here is crystal clear and perfect. You must have gotten a 
lemon that one time in Paramus. Keep the good info com- 
ing, as I look forward to reading it every month. " 

To: Lance Micklus 

From: Spencer Lepley (Tallahassee, FL) 

Date: 4/7 

Time: 20:05 

"Just a note in response to the April SoftSide — not 
everyone has problems with Modem I. My TRS-80® Model I 
and Modem I with ModemSO software is having no trouble 
working long distance to your bulletin board. Maybe there 
is unit-to-unit variability or maybe some Modem I's need to 
be tweaked up a little. " 



To: Lance Micklus 

From: Steve Reisenauer (Racine, WI) 

Date: 4/6 

Time: 15:09 

"Hi Lance, 

I read your article on Modems in SoftSide. What you said 
about Modem I users having problems has not happened to 
me at all. I have been using the Model I for almost a year 
now, have dialed across many miles, and have yet to 
discover any problems. As a matter of fact, my use of your 
BBS right now is proof ! 

By the way, I am using your ST80™ program as well. I 
Just want to say it's a great program and I've had great suc- 
cess with it. However, I will be buying the terminal package 
Omniterm in about a month. " 
14 SoftSide 



To: Lance Micklus 

From: Pat Tancreti (West Haven, CT) 

Date: 4/4 

Time: 01:21 

"Lance: I just finished reading your article in the April 
SoftSide about the Modem I and wanted to see if I could get 
through. I did!" 

To: Lance Micklus 

From: Gary Lamber (Magna, UT) 

Date: 4/3 

Time: 18:14 

"SoftSide about Modem I — I am calling from one and 
have had no trouble with it when calling a BBS or Data Base 
System. " 

UPS 

1 ran across an interesting article recently about the boom 
in the UPS business. No, I don't mean the brown trucks full 
of packages, but the companies that make Uninterrupted 
Power Supplies (UPS). Many computer centers, getting 
more concerned about power outages and the damage they 
can do, are investing in UPS systems. 

For example, one computer center said they use their 
computer at night to invest money. It's not unusual for 
them to loan as much as fifty million dollars on a short-term 
loan for one day. The interest on such a loan might be as 
high as $50,000. If the computer goes down and they can't 
make the transaction, that money is lost. Eliminating this 
risk can justify a UPS system in a hurry. 

Small computer users, too, are starting to find more and 
more need for UPS systems. Certainly, if you're running a 
computer bulletin board, a power failure can raise the devil. 
Also, more and more people are going to hard disk. When 
you blow up one of those, you really have problems. It takes 
me 35 minutes just to format my 10 megabyte hard disk, 
and 1 don't look forward to restoring all the files on it twice 
a month due to power failures. 

It seems to me that a company like Radio Shack ought to 
be able to design a UPS rather easily. If they weren't priced 
too high, I'll bet they'd sell a ton of them. 

The Whereabouts of 
Lance Micklus 

These days, I definitely do not feel like a computer pro- 
grammer. I've been spending most of my time writing new 
ST80^^ documentation. As I'm writing this, it still isn't 
finished, but it looks Hke it will be running about 100 pages 
(25,000 words). It certainly points up that there's a lot more 
to programming than just writing the program. 

In the middle of that project came an annual commitment 
to my old employer — Vermont Educational Television — 
to help them with their on-the-air auction. 

During the auction, I had a chance to catch up on some 



reading. One magazine was devoted to communications — 
television, cable, phone networks, satellites, and the like. Its 
subject was that famous line, "In a few years, everybody 
will have..." Specifically, it was referring to satellite com- 
munications. Even the poorest third world countries are 
now receiving service from the "birds in the sky." Rural 
villages in Africa, where the natives still wear grass skirts, 
have a satellite. 

There's one problem. It's called "the last mile." Yes, 
these primitive natives have their own satellite, but, they 
don't have telephones to make the calls using it. They don't 
have televisions to receive programs from it. The fact of the 
matter is, a lot of them are starving to death. They really 
don't care what the satellite can do for them and would 
gladly trade their "bird" for a bowl of rice. 

What many of the people who make statements of future 
profundity and bliss forget is that we Hve in a rich Western 
nation where people buy computers for toys. Even if you 
gave computers and television sets away for free, there 
would be many people on the face of the Earth who 
wouldn't want them because they'd be of no use. 

Let's use the telephone as an example: It would cost the 
third world nations $5 trillion dollars to install telephone 
equipment that would provide the same kind of service en- 
joyed by the rich Western nations today. There isn't any 
way third world nations can afford to spend that amount of 
money. If they had it, telephone service wouldn't be their 
first priority. 

The new technology from the West is spreading the gap 
between the haves and the have nots. That's the stuff that 
wars are made of. You certainly can't expect IBM or Radio 
Shack to turn their production plants into rice fields to feed 
the world. Yet, in a funny sort of a way, it is their problem, 
just as it is yours and mine. 

Next time you hear somebody say that in five years 
everybody is going to own a super wiz-bang, don't take it 
too seriously. There's more to this world than super-wiz 
bangs, hke food. 

The Mean Checkers Machine 

A lot of people have been getting upset because of The 
Mean Checkers Machine^^ and the problem with wide 
characters on the Model III. I don't blame them. I'm upset 
too. I've reported the problem to anyone at Radio Shack 
who would listen to me since the day I got my Model III. To 
date, nothing has been done about it. 

Part of the problem is that there is another, totally 
unrelated, problem in the ROM in 32 character mode. 
Everybody seems to set it aside as "that problem." The 
ROM has nothing to do with it. What's wrong is that when 
a Machine Language program writes into the video memory 
in 32 character mode, the CPU appears to be skipping one 
instruction. It does this only once in a while and it appears 
to have something to do with the clock interrupt. The 
problem can be severe in some machines, non-existent in 
others. 

Somebody on MicroNET found a way around the prob- 
lem. Place NOP instructions after every instruction modify- 
ing the video memory. That way, if the CPU does skip an 
instruction, it's harmless. That trick is now used in version 
2. 1 of The Mean Checkers Machine^^ and it works very 
well. Unfortunately, that doesn't help those of you with ver- 
sion 2.0 (the version published on SoftSideDV, November, 
1981) who are trying to use it on the Model III. I can tell 
you, however, that there is no easy patch. The fix requires 
putting one-byte instructions in the program in several dif- 
ferent places. It sounds simple, but it's not. 



The only thing that can be done is to replace your version 
2.0 with version 2.1 if you own a Model III. Unfortunately, 
that's not simple either. It costs money to handle an order. 
(I can sell you a single paper clip for $5.00 or a box of 100 
for $5.89.) I'll agree that it isn't fair for you to pay for a 
problem that isn't your fault. On the other hand, it's not my 
fault, it's not SoftSide's fault, and you can't blame Radio 
Shack either. After all. Radio Shack didn't sell you the pro- 
gram and they never said it would work. 

All that can be done is to upgrade your version 2.0 to ver- 
sion 2. 1 for $7.50. The folks at SoftSide have agreed to han- 
dle the orders. Just send your original tape or disk of The 
Mean Checkers Machine or November, 1981 SoftSide DV 
with a check or your charge card number (VISA or Master- 
Card) and we'll fix it up for you. Don't forget to include a 
note explaining what you want done. Here's the address: 

SoftSide Publications 
Department MCM 

6 South Street 
Milford, NH 03055 

If you feel this is unfair and it will make you feel better, 
you can also include a letter complaining about how you 
feel ripped-off. I won't argue with you and I won't blame 
you. After all, the only difference between version 2.0 and 
version 2.1 is a couple of NOP instructions. I do feel 
somewhat responsible, but can find no other answer at this 
time. 

Why Do People Get Ripped-Off? 

Since we're on the subject and, lately, everybody seems to 
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be talking about how badly computer consumers are 
treated, it might be a good time to talk about why people get 
ripped-off. About a year ago, when Lance Micklus, Inc. got 
its new photocopier, I got a call from a company in Califor- 
nia that sells toner. They claimed there was going to be an 
increase in the price of our Canon® toner. Since they 
couldn't get their sales literature to us in time, we could 
order by phone if we wanted to. The new price was going to 
be $145.00, but if I ordered now, they would sell it to me for 
$108.00 per box. I decided to order a box, but was shipped 
two boxes instead of one. With shipping charges, the cost 
totalled $245.00. 

Fool that I sometimes am, I paid the bill promptly. When 
we got around to using the toner, I suddenly learned why 
this stuff was sometimes called "California toner." It was 
awful. The copies it made were muddy. The waste developer 
tray, which normally fills only once a year, was full in a 
week. Now we got into the hassle of whether it was the toner 
(said the photocopy repairman) or the photocopier (said the 
company that sold the toner to us) causing the problem. Is 
this starting to sound familiar? 

We finally bought some Canon® toner from our local of- 
fice supply store at Hst price. It was $100 per box. Ripped- 
Off! 

The question is, "Why was I ripped-off?" The answer — 
because I was trying to save a fast buck. I tried to beat the 
normal pricing system by getting a deal. Instead, I have 
almost two boxes of worthless toner. All rip-off schemes are 
based on the fact that people are always looking for the fast 
buck. As long as they keep looking, there will be rip-off 
artists. 

One rip-off I ran into several months ago was over my 
own ST80-IIf^. It seems a computer store in Canada was 
having a going out of business sale. They had a terrific deal 
on ST80-IIf^ — only $75.00. I know of at least 30 people 
who bought their STSO-III^^ from this store. It is now out 
of business and so are the people who bought my software 
from them. In the first place, all 30 of these ST80-IIf^'s 
have the same serial number. The instructions were obvious- 
ly photocopies and not everybody got all of the instructions. 
Some people didn't get any instructions at all. 

Some of these people are trying to smile about it, since 
nobody wants to admit paying $75.00 for pirated software. 
Everyone knows you can get pirated software for free. Only 
a jerk pays for it. A few have come to me and now expect 
me to bail them out. They say that they paid for an ST80- 
I/I™', they didn't take a free pirated copy. They were being 
honest with me. Shouldn't I help them? 

I didn't rip them off. In fact, I never got a red cent of 
their money. If they had wanted a legitimate copy of ST80- 
Ilf^, why didn't they buy it from a reputable dealer? If 
they didn't know any reputable dealers, why didn't they buy 
it directly from me? The answer is simple. They were trying 
to save a fast couple of bucks and they got caught. 

It's just like my "California toner." What would my 
local office supply store have said had I asked them to 
replace the cheap toner I had bought from a place at the 
other end of the country? They would have said that they 
didn't sell me the stuff and didn't rip me off. Somebody else 
did. If I had wanted good toner, why didn't I buy it from 
them? Heck, they'd have given me a better price. 

The reason a lot of computer users are being cheated is 
because they, themselves, are cheating by trying to avoid 
paying a fair price for good products. In the end, it's only 
going to cost them more money. There are no "great" deals 
in this industry. So when you don't find them, remember, 
it's the consumer who pays the fair price who gets the 
"fair" deal. © 
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A NEW COMMAND FOR BASIC. 

There have been a number of utilities for and enhancements to 
BASIC pubHshed in recent months. One crucial command is still 
lacking, however, and I feel that it is time for someone to 
speak out on the problem. 

Anyone who has done any amount of programming 
knows how easy it is to get carried away. No one truly 
knows how many a poor soul has sat down at the 
keyboard to accomplish some small task, only to 
later find that when he looks up at his wife, she's left 
for mother's, his leg muscles have atrophied, and his 
home has been boarded up around him. 

Most set out with the best intentions, too: "I'll 
just finish the printer routine and then go to bed." 

"Just that one bug to find and I'm finished." 

"One more game and then I've got to wrap it up." 

Well, we all know about good intentions. There is an answer, however. It's called PUNT. PUNT is a com- 
mand which wrests control of the system from the operator when some preset condition is met. The routine then 
zeros all of core and locks up the keyboard. The only escape is to power down the system for a period of time 
equal to one night's sleep. 

As far as I know, no system offers a true PUNT. I am told that the ATARI® already supports a primitive form 
of PUNT. The ATARI® 800 allegedly locks itself up from time to time, requiring that the system be shut down 
and cold-started. This version is not to be recommended, however, as it seems that not even ATARI® knows how 
it works or how to control it. 

1 am also painfully aware that TRS-80® Model I's will spontaneously reboot and do other interesting things 
without warning. Really, though, this could scarcely be considered to have the same vigor and elegance as 
PUNT. 

As a BASIC operator, PUNT can be called under a wide variety of conditions. For instance, you might wish to 
read the real-time clock and set a limit: 

10000 IF TIMES = "03:00:00" THEN PUNT : REM 3:00 AM 

Or, perhaps you might use some variable to record the number of revisions to the current program you have 
saved in this session and set a limit there: 

10000 NR = NR + 1 : IF NR > 20 THEN PUNT 

Direct Machine-Language calls to the PUNT routine could be used to monitor error counts in programs Hke 
SCRIPSIT (which I am using to write this). Such calls could also keep an eye on other programs which do not 
run directly under BASIC. 

Other possibilities suggest themselves. If your wife is pounding on the door to the computer room, this could 
be wired to be a hardware interrupt and could be detected by appropriate sensors connected to an input port. If 
she were yelling at you, this would be a software interrupt and could be similarly handled. In either case, it might 
be wise to PUNT. 

Then again, you could (Yawwwnnnn....)mmm, excuse me. It's getting late. Well, as I said, there are many 
ways in which this useful and necessary command could improve the lot of programmers everywhere. All that is 
***PUNT 
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Transformation 
Techniques: 

Variation in the 

Rate of Change 

by Joan Tnickenbrod 



The shape of objects or figures 
drawn on a computer graphics system 
can be changed, modified or distorted 
by using a transformation program 
such as the one illustrated in the May, 
1982, issue of SoftSide. These shapes 
can be altered through a series of 
gradual or dynamic changes. The 
changes can take place in a series of 
even steps in which the amount of 
change is the same for each step. Equal 
increments of change in a transforma- 
tion series produce an even rhythm or 
a smooth visual flow, as shown in the 
article in the May issue. The amount of 
change in the shape of the figure from 
one step to the next in a transformation 
series can vary within that series. This 
article discusses a technique for vary- 
ing the amount of change within a 
transformation sequence to create 
various visual effects. For example, the 
change in shape at the beginning of a 
sequence can be very subtle, gradually 
increasing until the change in shape in 
each step of the sequence is dramatic. 
Thus, the shape or figure will appear to 
change slowly at the beginning of the 
sequence, and much more dynamically 
at its end. 

The rate of change in a transforma- 
tion series can create a variety of visual 
effects. The series of shapes in Fig. 1 
shows the transformation of the begin- 
ning shape into the end shape using a 
varied rate of change. At the beginning 
of the series, the shape changes slowly. 
You can see that the shapes on the left 
side of the series are very similar. The 
amount of change between the figures 
gradually increases and consequently 
the figures near the end of the series are 
very different from one another. Com- 
pare this series with the series of shapes 
in Fig. 1 in the May article. In that 
case, the amount of change between 
each step is equal. When equal inter- 
vals of change are used, the middle 
shape in this series is a square. As 
shown in Figure 1 in this article, pro- 
gressive intervals provide a different 
series of shapes. The series appears to 
begin slowly and then move more 
rapidly at the end of the sequence. This 
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concept of speed is clarified in the com- 
parison of Figures 2a and 2b. Both 
series transform a square into a dia- 
mond. However, the rate of change is 
different in each. The series in Fig. 2a 
begins with a small amount of change 
between steps, which gradually in- 
creases towards the end of the series. 
Fig. 2b illustrates the opposite as the 
series begins with a larger amount of 
change between the figures, decreasing 
as the series progresses. The visual 
speed, or acceleration rate, in a series 
of figures or animation is determined 
by the rate of change in the shape of a 
figure. The visual appearance of vary- 
ing speeds is shown in Figures 4a and 
4b. In Figure 4a, the letter T appears to 
gradually move back into space, flip 
upside down, and then move rapidly 
out towards the viewer. The difference 
in the speed of the figure moving into 
space and of the figure moving out 
towards the viewer is dependent on the 
amount of change between the figures 
in the sequence. The greater the 
amount of change between the figures 
in a series, the faster the speed of the 
figures appears to be. Figure 4c is a 
combination of Figures 4a and 4b and 
shows the figure moving in and out of 
space at varying rates. Figure 5 also 
shows a combination of two series in 
which a horizontal bar is proportional- 
ly transformed into a vertical bar. In 
the left side of this diagram, the 
amount of change between the figures 
gradually increases from a small 
amount to a larger amount. Then, 
beginning at the center vertical bar, the 
transformation begins with a small 
amount of change that gradually in- 
creases towards the end of the series. 
Since the diagram in Figure 5 is not 
symmetrical, it is clear that varying the 
rate of change in a transformation 
series has an effect on the progression 
of its shapes. 

In a regular transformation, the X 
and Y coordinates that define the 
initial figure are continually changed 
by a consistent amount, determined by 
the transformation program. To create 
variation in the rate of change between 
the steps in a transformation series, the 
amount of change in the X and Y coor- 
dinates is determined by a series of pro- 
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Why Johnny Can't Program - 
Materials for Computer Literacy 



by Dean F. Hayden Macy 



Since the beginning of time, human 
beings have been at war. It started in 
the Garden with the battle between 
good and evil. That battle continued 
on until there was a disagreement be- 
tween two people on the same side. In 
our complex society, war has evolved 
to a fine art. Today we tend more to 
the alienation of people and the aliena- 
tion of minds. The largest, single battle 
today is being waged over education — 
not whether it should exist or not, but 
how. The combatants I'll address here 
are the computerists and the anti- 
computerists. On the computer side are 
educators, teachers and students. 
Equally biased on the other side are, 
again, students, educators and 
teachers. 

David Moursund, Professor of 
Computer and Information Science at 
the University of Oregon says, "Our 
children will need a functional 
knowledge of computers to compete in 
the future job market. By 1985 a high 
percentage of all jobs will involve com- 
puter use in some way, and those who 
don't know how to use them will be at 
a definite disadvantage. The educa- 
tional system has not kept up with this 
trend because not enough teachers are 
computer-literate and because there are 
not enough computer related instruc- 
tional materials. The ability to use 
computers could become as important 
as the ability to read and write. Our 
educational system is completely 
dependent, in essence, on how teachers 
and parents view the change in the 
world." 

Some elementary and secondary 
teachers are against using computers in 
the schools. They see the change as a 
threat to their livelihood. These 
teachers feel that computers will 
replace them; that they will be 
relegated to the inane tasks of taking 
attendance and monitoring student 
needs. 

I can't imagine teaching has changed 
much since I attended school. In the 
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classroom, 70% of a teacher's time was 
spent controlling the unruly. The re- 
maining time was used for teaching 
and administration. Gifted children 
were lost in the shuffle. Many lost their 
incentive to learn, and some of these, 
to this day, are wandering around in 
our complex, technical world perform- 
ing menial tasks. "A mind is a terrible 
thing to waste." 

"The computer issue is not merely a 
theoretical problem posed by 
educators. Real obstacles must be over- 
come if students and teachers are to 
truly benefit from the classroom com- 
puter. It is important to realize the 
computer is not replacing the teacher, 
but is only assisting the teacher to 
educate the student. Teachers will still 
teach. Microcomputers have limita- 
tions, so the need for adaptable, 
responsive teachers will always be pre- 
sent." James Keogh, educational ad- 
visor, stresses that teachers who em- 
brace the computer must be adaptable; 
willing to change the way they think. 
Whereas children seem to have no 
problem adapting to change, the older 
one gets, the less one is willing to em- 
brace change. With the onspread of 
computer games in homes and arcades, 
children are primed for computer 
learning, but teachers, even those 
generally not concerned about being 
replaced by the computer, are still ap- 
prehensive. 

Why? The biggest reason is the 
quality of available computer soft- 
ware. Most "educational" programs 
are not created with education in mind. 
Programmers, attempting to gain en- 
trance into the field, often take a pro- 
gram designed for gaming, change a 
few lines, and label it "educational." 
Although this modified program may 
be extremely well structured, it may 
not be user-friendly. In fact, it may be 
very hostile. It is crucially important 
that programs, written to be used in the 
field of education, be extremely friend- 
ly to the user. K.I.S.S. (Keep it simple, 
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stupid.) should be the educational pro- 
grammer's motto. Programmers need 
to err on the side of simplicity, settling 
for modest goals in terms of explana- 
tion, or the amount of information 
conveyed. Programs are successful 
when they can give large audiences a 
learning experience they will enjoy and 
motivate them to go further into that 
experience. 

James Keogh says, "Educational 
programs must be challenging for 
students and meet their educational 
needs. Programs must be able to co- 
exist with current learning methods 
and textbooks. Programmers must an- 
ticipate every possible problem that 
might arise during a learning session, 
and develop contingencies for them. 
All ambiguous words and phrases must 
be removed and the software must be 
very carefully assembled and de- 
bugged; if not, the student and the 
teacher will become very frustrated." 

Frustration is commonplace for 
reviewers of educational software. A 
new educational monthly disk/mag- 
azine for the Apple^^"^, WINDOW, 
touted to be the last word in computer 
learning, contains many bugs and is 
not very user-friendly. WINDOW 
could be made much more user- 
friendly by trapping errors. Instead of 
the programs crashing, a message 
could be flashed to the user, prompting 
him/her to reenter the program using 
XXX key. 

I have found many pseudo educa- 
tional programs which talk down to the 
student with demeaning statements. 
Imagine a student, upon three wrong 
responses in a computer administered 
test, getting a "raspberry" accom- 
panied by a CRT message saying, "OK 
Stupid! Obviously you have not 
studied your textbook. 1 don't work 
with dummies," and the screen goes 
blank. (Yes! It is a marketed program.) 
At first glance, the statement is 
humorous, but after a moment, the full 
import of the message sinks home and 



**The ability to use computers 
could become as important as 
the ability to read and write. '' 

David Moursund, Professor of Computer & 
Information Science at the University of Oregon. 



you become angry and frustrated; 
angrier still if you're the one at whom 
the message is aimed. 

Another, more common problem, is 
English usage and mathematical ac- 
curacy. Many, otherwise excellent, 
programs have severe vocabulary 
problems. Programmers tend to pro- 
mote the same program to tutor 
elementary and college students, 
changing only the the level of the util- 
ized facts, disregarding the context. 
Thus, a second grader may be asked to 
decipher a question such as, "What is 
the potential of technological advance- 
ment in today's complex society?"; 
which is not quite as funny as the col- 
lege student who is asked, "See robot 
run? Run robot, run. See the space 
ships? The robot runs to the ships. 
How does the robot get into the 
ship?". Mathematical problems prove 
to be annoying to teachers when com- 
piled by the programmer. Assume the 
problem: 2 plus 3 times 4. In the lower 
grades, children studying arithmetic 
will answer 20 and be correct. But, a 
high school student studying algebra 
will answer 14 (2 + (3X4)). Both 
students' answers are correct, however 
most programmers do not allow for 
varying correct answers to a question. 

Of the nation's 1,085,000 educators, 
how many are computer aware? In- 
structor, the national education 
magazine, ran a Computer Attitude 
Survey. The results are telling. Of 
the 4000 classroom teachers who re- 
sponded, 86 percent expressed a high 
level of interest in computers, however 
only 39 percent actually used com- 
puters for instruction; fortunately 38 
percent had taken inservice courses in 
computers. The survey also showed 
that twice as many students as teachers 
had participated in real-time ex- 
perience working with computers. 
Educators reported Apple™ the most 
used school computer with TRS-80® 
the runner-up. ATARI® rated fifth. 
These computers were used primarily 
for drill practice and enrichment. 40 




percent of the school computer's time 
is devoted to programming. One 
reason is clear; software available to 
the teacher is not designed for 
classroom use, and programs designed 
for the classroom are, for the most 
part, not properly focused for the in- 
tended age group. The ultimate solu- 
tion is to have a child write software 
for children, but most children with the 
awareness to program a computer 
don't have the educational background 
to write the required software. 

During the weeks of preparation for 
this article, I was inundated with texts 
and software of every description by 
many authors. Some were educators, 
many were teachers and a few were 
mothers and fathers of questing 
children. By far, the material I read 
authored by parents used a more direct 
approach to children's needs than most 
of the writings and programs offered 
by the professionals. If educators 
would remember their own childhood, 
the approach to computer awareness 
materials for children would be much 
different. 
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The child always wants the dessert 
first. He doesn't care about the history 
and technological development of the 
computer. He does not want to know 
about the hardware governing the 
operation of the computer. He cares 
even less about Boolean algebra or 
binary numbers. (Would you care if 
you were a child?) He may be in- 
terested, to some minor degree, in how 
a computer "thinks," but what he real- 
ly wants to do is turn the thing on and 
watch it make pictures or do something 
constructive. After that, he wants to 
play with the keyboard and make the 
computer do "tricks." Reasoning as a 
child, an author with some program- 
ming skills could write a manual to 
teach children to program a computer. 
If the author wanted the child to have 
some of the background mentioned 
above, he could offer a taste of the 
dessert, holding back the remainder 
until the child had digested the liver. 
(Ugh!) 

Tandy Corporation markets TRS- 
80® Computers. Their Model I manual 
assumes nothing about the reader other 
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than that he or she can read. This is an 
ideal learning tool for children of any 
age who want to study programming 
from the beginning. The author takes a 
person from the fundamentals and 
eases him through to advanced pro- 
gramming skills, without fanfare, and 
using a little tongue in cheek humor to 
help lighten the load. At first glance, it 
looks as though the manual was writ- 
ten for idiots. However, aren't we all 
idiots when the time comes to learn 
something we know absolutely nothing 
about? If other computer manufac- 
turers wrote instruction manuals along 
the same lines as the one offered by 
Tandy, there would be little need for 
the hundreds of "how to" books Utter- 
ing my desk. Alas, the authors of the 
Apple^'^and ATARI® manuals were 
not as aware of their audience. 

Camelot Publishing is a distribution 
company for computer awareness 
books and materials geared for the 
educational field, written by Donald 
D. Spencer, Ph.D.. Using an offbeat 
approach to programming and com- 
puter instruction, he writes excellent 
material for the school child, in a man- 
ner the child can accept. (He 
remembered that he too was once a 
child.) Of over 60 books Camelot 
makes available to the elementary 
teacher, I reviewed ten. The books Fun 
With Microcomputers and BASIC, 
Visual Masters for Teaching Basic Pro- 
gramming and Computer Awareness 
Coloring Book proved to be the best of 
the lot. After reading Fun With 
Microcomputers and BASIC, I 
wholeheartedly agreed with The 
Mathematics Teacher editorial which 
stated, "This book is written in a 
humorous tone with many programs, 
activities, and illustrations that portray 
the computer as a "fun" machine — 
something to be enjoyed and used for 
solving problems." Spencer is a fun 
person and a prolific writer who is able 
to ease a whopping amount of data in- 
to a child without the child ever realiz- 
ing he has assimilated the amount of 
information fed to him. (To obtain a 
catalog of Spencer's materials write to: 
Camelot Publishing Company, P.O. 
Box 1357, Ormond Beach, FL 32074) 

For the very young child, the book 
from Creative Computing Press, Katie 
and The Computer, by Fred D'lg- 
nazio, is a charming and effective 
teaching tool. Creative Computing also 
has a few books authored by Debbie 
Larsen, a talented mother, who has 
taught her own children to program an 
Apple^"^ by presenting data to the 
children in a way they can understand. 
(The people at Apple^"*^ pubHsh many 
excellent books, but most are far 
beyond the grasp of young people and 
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some adults as well.) 

The only other teaching manual I 
reviewed which I would recommend is 
written for the Apple'^'*'. A tome by 
Aubrey B. Jones, Jr., it's entitled, / 
Speak Basic To My Apple. Whereas 
the book, in my opinion, addresses the 
liver before the dessert, it is never- 
theless an excellent teaching tool for 
the Junior High School student. The 
manual assumes the teacher knows 
nothing about the Apple^"^ computer, 
but always keeps the instructor ahead 
of the class, (available from Hayden 
Publishing Co.) 

For a little Apple^"^ polishing, try 
WINDOW. Ahhough the initial disk 
contains bugs and is not very user- 
friendly, one program written for the 
beginning programmer shows how any 
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short, user-entered program, contain- 
ing INPUT, FOR-NEXT loops, and 
GOSUB, functions during real-time 
use. The student can step through his 
program, one instruction at a time, or 
crawl through the address lines in slow 
motion. 

If I were to write a book on pro- 
gramming for children, I would first let 
the child taste the dessert, by 
demonstrating a simple program on a 
CRT readout. Next, I would guide the 
student through the computer's 
"thinking process." Using everyday 
examples, such as eating or opening a 
door, I would have the child trace, in 
block diagram format, everything a 
computer controlled robot would do to 
mimic the human movements. I could 
then show pictures, explaining the 
workings of a player-piano, and how it 
is programmed, comparing it to the 
computer. (The liver, so to speak.) 
After this short introduction was 
digested, I could give the child his 
dessert by having him perform a simple 
programming exercise using a micro- 
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computer keyboard. This done I would 

then Oh No! The BBC pre-empted 

me. (Great minds and all that!) 

Last evening I was given a video 
cassette tape and asked to play it over 
my "telly." It was an offering from the 
BBC entitled The Computer Pro- 
gramme, which eases you into com- 
puter literacy using exciting video 
techniques. The tape I viewed was the 
third in a series of ten, twenty-five 
minute programs offering an in-depth 
exploration of the microcomputer. 
"Talking To A Machine" not only 
stole my ideas on how to effectively 
present computer programming to a 
child; it did it in grand style. The 
magnificent Trooping the Colour 
ceremony was used to illustrate, with 
royal soldiers marching in precision to 
a simple command, how a computer 
accepts commands and acts according- 
ly. And an ancient, working steam 
organ played melodies reminiscent of 
the calliopes of the good ole' days, us- 
ing a punch card format, not unlike 
IBM cards, to feed the data. (A player 
calliope, if you will.) The program is 
presented in the relaxed British style 
and is entertaining as well as instruc- 
tive. The series is available in a 
multitude of video tape and film for- 
mats priced from $1700, truly a low 
cost program for a school or library, 
considering the educational content. 
(For more information on this thrilling 
series, contact: Films, Inc., 733 Green 
Bay Road, Wilmette, IL 60091.) 

Following a recent study of com- 
puter literacy among high school 
graduates it was found that few 
graduates ever see a computer in the 
classroom. They have no concept of 
the computer's effect on society in the 
future. But, this will change and is 
changing. 

It is clear that computerized educa- 
tion is inevitable. It will be vastly better 
than the present system, far more effi- 
cient, and fun. The single key to educa- 
tion is that learning must be fun! 
Education courses will be presented by 
enthusiastic people in interesting ways. 
More Spencers and Larsens will 
graduate from school systems presently 
using computers in education and new 
ways of teaching will emerge. Educa- 
tion will expose our impressionable 
children to the fascination of elec- 
tronics, communications and com- 
puters, and the world will change. It 
won't be the world of Orwell's 1984, 
but a world where challenges will be 
embraced, children will not lose their 
incentive, identities will not be lost in 
the shuffle — a world where a child's 
brain can't be wasted. 

The world I want to live to see will be 
that world! © 



CA TS: 

Computet Assisted 
Testing Sffstem 
PARTOm 



by Jon R. Voskuil 

ATARI® and TRS-80® translations by 

Alan J. Zett 

CA TS is an educational utility pro- 
gram for an Apple™ with Applesoft 
and 32K RAM (tape) or 48K RAM 
(disk); an ATARI® 400/800 with 16K 
RAM (tape) or 24K RAM (disk); or a 
TRS-80® Model I/III with 16K RAM 
(tape) or 32K RAM (disk). 




With an increasing number of com- 
puters finding their way into schools 
and homes, teachers and parents are 
looking for educational ways to use 
them. CA TS is a set of programs that 
will enable you to use your computer to 
create and administer tests, and to keep 
records on the results of the testing. 
This first module is the one necessary 
to create the tests; the test-giving and 
record-keeping modules will follow in 
the next issue of SoftSide. 

The test creation program operates 
from a main menu which enumerates 
all of the options and is generally self- 
explanatory: 



1 . Add to test in memory 

2. Review test in memory 

3. Save test to disk (tape) 

4. Begin a new test 

5. Load a test from disk (tape) 

6. Reset question entry options 

7. Print test to printer 

8. Quit 

When running the program for the 
first time, the only logical choice is to 
begin a new test, option 4. In the disk 
version, you will be prompted for a file 
name to use for your test, and your 
disk will be checked to make sure that 
you won't be writing over an existing 
file without knowing it. The tape ver- 
sion skips directly to the next part 



You will then be asked to choose 
among a number of options to be used 
during the creation of the test. Three 
types of questions may be entered: 
true/false, multiple-choice, and fill-in- 
the-blank. You may choose to have all 
questions of the same type, or to inter- 
mix the types throughout the test. You 
may then choose either to give the same 
value to all the questions, or to enter 
the relative value of each question 
separately. Further, you may elect to 
use a hint mode which allows you to 
enter a hint with any of the questions, 
with an optional corresponding penalty 
if the student asks for the hint. If you 
turn the hint option on, you are not re- 
quired to enter hints, but you may if 
you so desire. You can also specify a 
uniform penalty for all hints, or choose 
to give each hint its own penalty factor. 
The penalty is expressed by a number 
from through 9, representing the 
number of tenths of the question's 
value to be deducted for using the hint. 

Any of these options may be reset 
during the creation of the test simply 
by returning to the main menu and 
choosing option 6. For example, this 
allows you to enter a number of 
true/false questions in a row, and then 
switch to multiple-choice; or to give a 
uniform point value to a group of 
questions, and then enter variable 
values for others. 

Once these options are chosen, ac- 
tual entry of the questions and answers 
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begins. The design of the program 
limits the text of any single question 
and this is somewhat different for each 
system. On the Apple™, the limit is 
230 characters, or about six screen 
Hues. On the TRS-80®, the limit is also 
230 characters. This is a little more 
than three and a half screen hnes. The 
ATARI® version allows you one full 
screen line or 38 characters. This is 
enough for most needs. If not, the limit 
may be raised by changing the value of 
LN in Hne 1. If you reach the limit, the 
computer will not allow you to enter 
more characters. The Apple^"^ and 
ATARI® version will also beep at you. 
Any characters may be typed into the 
text, including all punctuation. Quota- 
tion marks, however, will be converted 
to apostrophes (single quotes) because 
of disk file format. 

As you type in a question, you may 
backspace in the normal way to correct 
mistakes. If you want to erase what 
you've entered so far and start at the 
beginning, pressing CTRL-E wiW do 
the trick. (It's much faster than 
backspacing to the beginning.) If you 
have occasion to enter underline 
characters into the text (for fill-in-the- 
blank questions, for example), you 
may do so using CTRL-U. Pressing 
RETURN signals the end of the input, 
in the usual way. If you press 
RETURN only when prompted for the 
text of the question, you will be re- 
turned to the main menu. Keep in mind 
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that the question will be displayed ex- 
actly as you type it on the screen, so be 
careful to format it neatly in the 
available space, avoiding messy end- 
of-line breaks. 

Depending on the type of question 
you are entering, and the options 
you have chosen, you will then be 
prompted for the possible and the cor- 
rect answers, the question value, the 
hint, and the hint penalty. Since 
true/false questions always have the 
same answer choices, you need only 
enter T or F for them. In the case of 
multiple-choice questions, you must 
enter all the choices, pressing 
RETURN after each one and pressing 
it once more following the last choice. 
You are then prompted for the number 
of the correct choice (one only). In the 
case of fill-in questions, you may enter 
more than one correct response if you 
so desire. You may also choose how 
many of the initial characters (1-9) of 
the response must be matched in order 
to be judged correct; pressing 
RETURN only will require a perfect 
match. 

At any time, the test being created 
may be saved. Return to the main 
menu by pressing RETURN when 
prompted for the next question, and 
then choose option 3. At this point, the 
disk version will give you the option of 
changing the disk file name, or using 
the one already entered. After saving 
it, you can then continue by choosing 
option 1. 

You may also review the questions 
entered so far by choosing option 2. 
This will display each question in turn, 
along with all possible and correct 
answers, hints, values, and penalties. 
Multiple-choice questions will have the 
correct answer number displayed in in- 
verse on the Apple^"^ and ATARI®, 
and marked with an asterisk on the 
TRS-80®. Fill-in questions will have 
the number of characters required for 
each answer specified on the ATARI® 
and TRS-80® and displayed in inverse 
on the Apple™. (A later addition to 
this part of the program will allow you 
to edit questions as well as simply 
review them.) 

Once you have a test or two saved, 
you can recall them at any time using 
option 5 from the main menu — either 
immediately upon running the pro- 
gram, or at any later time. If you 
already have a test in memory, you will 
be asked to confirm that you want to 
load a different one, since the current 
one will be wiped out. (The same con- 
firmation is required for option 4, 
beginning a new test.) 

Finally, the printout option (number 
7) will provide a hard copy of the test 
in memory. The Apple^"^ version 
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assumes that your printer controller 
card is in slot 1. The printout routine 
also assumes that you'll be using the 
printout only for proofreading or 
record-keeping purposes: the text is 
formatted for the screen, and will look 
a httle odd on an 80-column printer. 

The next CA TS module will enable 
you to administer, to individual 
students, the tests you have created and 
stored. It will include features such as 
administering all or just part of a test; 
enabling or overriding various options 
that you have already included in the 
created test; providing various levels of 
feedback to the student about his scor- 
ing; and security protection, so that 
students will not easily be able to access 
the correct answers or other students' 
scores. 

Programming Notes 

The discussion which follows refers 
primarily to the Apple^"^ and TRS- 
80® versions. Since there are no string 
arrays in ATARI® BASIC, the ques- 
tion, hint, and answer data are stored 
as parts of three very large single 
strings rather than as elements of string 
arrays. Also, the digits referred to in 
the discussion are appended to the end 
of each data string rather than the 
beginning in the ATARI® version. 

The Q$ array holds the text of each 
question; the H$ array holds the cor- 
responding hint, if any; and the A$ ar- 
ray holds all the answers for the 
multiple-choice and fill-in questions. 
In addition to the actual question text, 
each entry in the Q$ array has con- 
catenated onto the beginning of it 
several numbers which represent that 
question's parameters. True/false 
questions have five such digits, and 
the other two types have nine; they are 
concatenated in lines 3500 and 
following. 

The second digit represents the ques- 
tion's relative value, which defaults to 
1 if no individual values are assigned. 
The last two digits prior to the text of 
the question are also the same for all 
question types: The next-to-last 
represents the hint status (0 is off, 1 is 
on), and the last represents the hint 
penalty. 

Between the first two and last two 
digits, the question types differ in their 
format. For true/ false questions, only 
one digit is needed here, representing 
the correct answer: 1 for true, for 
false. The other two question types use 
a total of five digits to point to the 
possible and the correct answers. First 
there is a three-digit pointer to an ele- 
ment of the A$ array, which is either 
the first answer choice (in the case of a 
multiple-choice question) or the first 
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correct response (in the case of a fill-in 
question). The next digit tells how 
many possible (multiple-choice) or cor- 
rect (fill-in) responses there are in the 
A$ array for that question. And the 
last of these five digits gives either the 
number of the correct answer 
(multiple-choice) or the number of 
characters that must be matched for a 
correct response (fill-in). 

The subroutine at line 15000 of the 
Apple^'^ disk version is the one found 
in the Applesoft Reference Manual for 
fixing problems caused by the use of 
the ONERR GOTO statement. This is 
poked into memory at the beginning of 
the program, and then called whenever 
an ONERR statement has been ex- 
ecuted. Without it, such things as 
GOSUBs and RETURNS can get quite 
messy. 

The routine at line 15000 of the Ap- 
ple^"^ tape version is a routine to read 
and write string arrays to and from 
tape. The routine is poked into 
memory at the beginning of the pro- 
gram and called whenever a test is 
loaded from or saved to tape. This is 
the same routine that was printed in the 
May, 1982 issue of SoftSide as an 
enhancement to Microtext 1.2. 

In the Apple™ version, the "Wait 
for a keypress" subroutine at line 
lOOOO uses Applesoft's WAIT state- 
ment, a very handy but little used 
feature. It can be used to wait for a 
specific keypress (or other, more 
esoteric functions), but in this 
case simply waits for ANY key to be 
pressed. Using the mnemonic variable 
names KEY and PRESS makes the 
statement speak for itself very nicely. 

The menu formatting subroutine at 
line 11000 is one which can be easily 
transplanted to other programs. It can 
be used either in conjunction with 
DATA statements to READ the 
necessary menu information, or with 
string assignment statements. Both 
methods are used in the CATS pro- 
gram. When DATA items are to be 
READ, the routine is entered at line 
11000; when string assignments have 
already been made, the GOSUB is to 
line 11010 instead. 

A NOTE ABOUT THE 
LISTINGS: 

In the listings which follow, the com- 
plete disk version of the program is 
listed first. The changes necessary to 
use CA TS with tape are printed follow- 
ing the disk version listings. The 
SWAT table for the tape version is for 
the complete tape program and 
assumes that the user has entered the 
disk version and then made all the 
changes exactly as specified. 



Disk version variables: 



A$: Answers to questions. (ATARI) 

A$(*): Array of answers to questions. 

(AppIe/TRS-80) 

Al: Pointer to an answer number. 

AP: Pointer to next answer number 

(while building array of answers). 

B$: Backspace character. 

BEL$: Bell character. 

(Apple/ATARI) 

BR$: String containing left and right 

bracket characters. (Apple) 

C: Correct answer number, or 

number of correct answers (depending 

on question type). 

C$: Input character. 

CC: Value of input character. 

CLR: Keyboard clear address. 

(Apple) 

CM: Number of characters to match. 

D$: Control-D. (Apple) 

E: Error code. (Apple/TRS-80) 

EO: Entry options flag. Equals zero 

if options have not been chosen. 

F$: Test name. 

FIX: Address of ONERR-FIX routine 

in memory. (Apple) 

H: Used for horizontal positioning. 

H$: String of hints. (ATARI) 

H$(*): Array of hints. 

(Apple/TRS-80) 

HP: Hint penalty. 

HS: Hint status. 

HYNT: Hint flag. 

I: Loop variable. 

1$: Input string. 

IT: Value of input character. 

J,JJ: Loop variable. 

KEY: Address of keyboard strobe. 

(Apple) 

L,N: Misc. 

N$: Menu title. (Apple/TRS-80) 

N$(*): Menu options. 

(Apple/TRS-80) 

NC: Number of characters to match. 

NN: Number of correct answers. 

PFLAG: Hint penalty flag. 

PRESS: Equals 128. (Apple) 

PW$: Test file password. 

Q$: A question. (Apple/TRS-80) 

Q$: All test questions. (ATARI) 

Q$(*): Array of test questions. 

(Apple/TRS-80) 

QF$: Disk file name of test. 

QN: Question number or total 

number of questions. 

QUO$: Equal to a quotation mark. 

(Apple/TRS-80) 

QV: Question value. 

S: Address of speaker. 

(Apple/ATARI) 

S$: String of spaces. (Apple) 

S$: Delete line character. (ATARI) 

T: Question type. 

T$: Question type names. (ATARI) 



T$(*): Array of question type names. 

(Apple/TRS-80) 

TF: True/False flag. 

TF$: Contains "TRUE" and 

"FALSE". (ATARI) 

TF$(*): Contains "TRUE" and 

'FALSE'. (Apple/TRS-80) 

TYPE: Question type. 

U$: Underline character. (Apple) 

U3$: Three underline characters. 

(Apple/TRS-80) 

V: Used for vertical positioning. 

VFLAG: Question value flag (fixed 

or variable). 

VV: Used for vertical positioning. 

X: Misc. 

X$: Single character input string. 

(Apple/TRS-80) 

Z: Loop variable. 



Additional tape version variables: 

RD: Address for tape read routine, 
equals 800. (Apple) 
WR: Address for tape write routine, 
equals 768. (Apple) 
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t ATARI BASIC 

t "CATS" 

* Author! Jon R. Voskuil 

» Translated: Alan i. Zett 

% (c) 1982, SoitSide 

Set question line length. 

1 LN=1 

10 BOTO 500 

Custom line input routine. 

100 1$="":V=PEEK(N84):H=PEEK(85)!P0KE 

CRS.NO:? CHR*(254); 

110 6ET tNl,C:IF C<32 OR (C>122 AND C< 

160) THEN 150 

130 C$=CHRtiC):L=LEN!I$):IF L=LNtN3e 

R !.L=N38 AND NQ=N1) THEN ? CHRt!253);: 

GOTO NllO 

140 IJ(LEN(I»)+Nl)=Ct:? C$;:SOTO NIlO 

Process control comnnands. 

150 IF C=155 THEN POKE CRS,N1:N8=N1:RE 

TURN 

160 IF C=21 THEN C=95:60T0 130 

170 IF C=N5 THEN 60SUB N1000tN10:60T0 

NlOO 

180 IF C0126 THEN BOTO NllO 

190 C$=CHR$(C):L=LEN(I$)!lF L<N2 THEN 



I$="":60TO 210 

200 I$=I$(N1,L-N1) 

210 IF DHO THEN ? C*;' ";«,■ 

220 BOTO NllO 

Define variables. 

500 N0=0:N1=1:N2=2:N3=3:N4=4;N5=5:N7=7 

:N9=9:N10=10:N14=14:N15=15:N37=37:N3B= 

38 ; N39=39 : N48=48i N84=84 : N89=89 

502 N100=100:N107=107:N110=110!N1000=1 

000:N11000=UOOO!CRS=752 

Display title page and initialize 
program. 

510 GRAPHICS NOiPOKE CRS,N1:CL0SE 11:0 

PEN IN1,N4,N0,"K" 

520 POSITION 17, N5:? "C A T S" 

530 POSITION 12, N7;? 'by Jon R. Voskui 

1' 

535 POSITION N7,N9:? 'Translation by A 

Ian J, Zett" 

540 POSITION N10,16:? ' QUESTION ENTRY 

HODULE ' 

Calculate free string space and 
define strings. 

550 DIM P«(N10),T$(45),TF$(N10),I$(LN 

IN48),C$(N1),S$(N1),F$(8),QF$(12),AZ»( 

N10),BEL»(4):AZ=lNTiFRE(N0)t0.3) 

555 5=INT!ftZ/(.LNiN48+152)!:H=Q;A=HtN3: 

Din e$!St(LNtN48i),H$(HtN381,ft$(AtN331 

560 S$=CHR$ ( 156) ;BEL$=CHR$ (253) : BEL< (N 

2)=" " 

570 T»!N1,15)='TRUE OR FALSE ':T»(16, 

30)="MULTIPLE CH0ICE":T»!31,45)="F1LL- 

IN ■:TF$iNl,N5)="FALSE" 

580 TF$!6,N10)="TRUE ":S=53279 

590 QN=NO:AP=NO 

600 POSITION 6,22:? 't PRESS ANY KEY T 

CONTINUE t';!POKE CRS,N0:BET IN1,L:G 

OSUB 700: BOTO NIOOO 

Set test data strings to spaces. 

700 A${N1)=" ':A*(A»N38)=" "!A»(N2)=A» 
(N1):0$=A»:H$=A«:RETURN 

Main program loop. 

1000 6RAPHICS N0:P0KE CRS.NhPOSITION 

N2,N4:REST0RE 20000:60SUB NUOOO 

1110 IF IT<N4 OR IT>N5 OR QN=N0 THEN 1 

140 

1120 ? BELt; 'ERASE TEST IN HEHORY. QK ? 

■i:6ET IN1,AZ:IF AION89 THEN 60T0 NIC 

00 

Erase old test. 

1130 QN=N0:AP=N0:B0SUB 700 

1140 IF (1T<N4 OR IT=N7) AND QN=NO THE 

N ? BEL«;' NO TEST IN HEHORY ':FQR Z=N1 
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TO 600:NEn 2:60TD NIOOO 


3150 ? !lF NC<N9 THEN NC=NC+N1:60T0 31 


3560 X=CC!lF T=N3 THEN X=C« 


1150 ON IT BOSUB 3000,5000,6000,3000,7 


20 


3570 AZ»(LEN(AZ$)+N1)=STR$(X) 


000,4000,8000,9900 


3160 POKE CRS,MO!? " CORRECT RESPONSE 


3580 AZ$(LEN(AZ$)+N1)=STR$(HS) 


1160 60T0 NIOOO 


« 


3590 AZt(LEN(AZ»)+Nl)=STR»(HP) 




3170 ON T GOTO 3180,3210,3230 


3600 Qt(QNtLNtK4B-N9, (QNtLNtN48)-Nl)=A 


Get file name and test for existing 




z$ 


file. 


Input True/False response. 


3610 BOTO 3030 


2000 6RAPHICS NO-.? "FILE NAME FOR THIS 


3180 POKE CRS,N1:? "T OR F ? "i!BET IN 


3620 RETURN 


TEST!'!? !? "=> "i! INPUT F$:60SUB N15 


l.Xi? CHR»(1():IF I«>N84 AND XO70 THEN 


Select question options. 


INlOOOiPOKE CRS,N1 


3180 




2010 ? :? "INSERT DISK AND PRESS A KEY 


3190 TF=NO!lF )(=N84 THEN TF=N1 


4000 GRAPHICS NO!POKE CRS,Nl!? !RESTOR 


"!6ET IH1,L 


3200 60T0 3280 


E 20010: E0=N1 


2020 TRAP 2060 


3210 POKE CRS,Nl!? S$;"NUI1BER?"i:6ET 1 


4010 BOSUB N11000!TYPE=IT-Nl!lF TYPE=N 


2030 OPEN tN2,N4,N0,QF$ 


Nl,CC:CC=CC-N48!lF CC<N1 OR CONC THEN 


THEN TYPE=N4 


2040 ? !? -QUIZ FILE ";F*;"' IS ALRfA 


3210 


4020 BOSUB N11000:VFLA6=IT-N1 


Dri? "ON THE DISK - OK TO ERASE?" :CLO 


3220 ? !60T0 3280 


4030 BOSUB N11000:HYNT=N2-IT 


SE tN2 


3230 NN=N0!GQSUB NlOO:? 


4040 IF HYNT=N0 THEN 4080 


2045 SET INl.LilF LON89 THEN 60T0 N2« 


3240 NN=NN+N1 : AP=AP+N1 ! A* ( AP tN38-N37, A 


4050 BOSUB N11000:PFLAB=Nl!lF IT=N2 TH 


NIOOO 


P»N38)=I«:IF NN=N9 THEN 3270 


EN 4070 


2050 60T0 2070 


Select an alternate response. 


4060 PFLA6=N0:? " HINT PENALTY, TENTHS 


Trap for "File Not Found" error. 


(0-9)"i:BET il,HP:HP=INT(HP-47.5):IF 




3250 ? " ALTERNATE ANSWER (RETURN IF N 


HP<N0 OR HP>N9 THEN ? S»i:BOTO 4060 


2060 IF PEEK (195)0170 THEN 60SUB 1010 


ONE) ':G0SUB NlOO:? 


4070 POSITION N2,22!? "ALL 0K?";!6ET 1 





3260 IF I*<>"" THEN 3240 


Nl,L!lF L=7B THEN 4000 


2070 CLOSE IN2! RETURN 


3270 ? St;" CHARS TO HATCH (1-9, RETUR 


4080 IF LON89 THEN 4070 


Cfiecl< free question space. Cancel 


N=ALL) "pBET INl,C«:CH=CH-N48!lF CN>N 


4090 RETURN 


input if no more room. 


9 AND CHOI 07 THEN 3270 




ZOOO IF QN=B OR AP=A THEN ? BEL$;"NO H 


' 3275 ? !? !lF CH=N107 THEN CH=NO 


Review test question/response data. 


ORE ROOn FOR QUESTIONS"; :FOR Z=N1 TO 6 


3280 IF HYNT=NO THEM 3350 


5000 FOR I=N1 TO QN: GRAPHICS NO:I$=Q»( 


OOiNEH ZjOOTO NIOOO 


Input flint if applicable. 


ItLN»N48-(LNtN48-Nl),(ItLNIN4B)-Nl):60 


If not set, get test file name and 


3290 ? " HINT (RETURN IF NONE) " 


SUB N9tN1000 


question options. 


3300 BOSUB NlOO:? 


5010 ? I;"! ";T*(T>N15-N14,TtN15);" 


3005 IF QN=NO THEN BOSUB N2tN1000 
3010 IF EO=MO THEN BOSUB N4»N1000 


3310 H*(BNtN38-N37,QN»N3B)=I* 

3320 HS=M1:IF It="" THEN HS=NO:GOTO 33 

50 


VALUE="iV:? 

5020 ? I«:POKE CRS,N1 

5030 IF T=N1 THEN ? "ANSNER: ';TF$((TF 


3020 QV=N1 


+N1)»M5-N4,(TF+N1)IN5):? :BOTO 5120 




3330 IF PFLAB=NO THEN 3350 




Input questrons and type chosen. 




5040 ? 'ANSWERS: "|:IF T=N3 THEN 5080 




Input flint penalty and question 


5050 ? :? :? :FOR J=N1 TO N!JJ=A1+J-N1 


3030 A1=AP+N1: GRAPHICS NO:? " QUESTION 


value. 


:POSITION N2,PEEK(N84)-N1:? CHR»(J+M48 


« •!9N+Nl!P0K.E CRS,N1 


3340 ? S$;" HINT PENALTY, TENTHS (0-9) 


+(128t(J=C))); 


3040 POSITION N2,N2!T=TYPE:IF T=N4 THE 


";!6ET INl,HP!HP=INT(HP-47.5)!lF HP<N 


5060 ? ", "iA»(JJ»N38-N37,JJIN38):IF P 


N ? "1=T/F 2=«ULTI 3=FILL-IN 0=HENU 


OR HP>N9 THEN 3340 


EEK(N84)>19 THEN ? "?'|:BET IN1,L:? CH 


"!? !? "TYPE?":6ET tNl,T!T=T-N48 


3345 ? :? 


R$(156); 


3045 IF T=N0 OR T=N107 THEN RETURN 


3350 IF VFLAB=NO THEN 3500 


5070 NEXT J!BOTO 5120 


3050 IF T<NO OR T>N3 THEN 3040 

3060 POSITION 21, NO!? T$(TtN15-N14,TtN 


3360 ? S$!" QUESTION VALUE •;:BET tNl, 
QV:QV=QV-N48!lF QV<N1 OR QV>N9 THEN 33 


Calculate portion of response to 
matcfi. 


15):H=N2!V=H:60SUB NIOOINIOO 


60 




3070 NQ=N0:60SUB NlOOiPOKE CRS.Nl 


3370 ? 


5080 ? "(HOST NATCH "pIF C=NO THEN ? 


3080 IF 1$="" THEN 3620 




•ALL";: GOTO 5090 


3090 eN=QN+Nl : Q$ ( (QNtLKtN48- (LNtN48-Nl 


Construct encoded 


5085 ? C; 


)),(QN»LN»N48)-N10)=I» 


question/response data. 


5090 ? • CHARACTERS)":? :? :FOR J=N1 T 




3500 AZt=STR»(T) 


N:JJ=Al+J-Nl!POSITION N2,PEEK(N84)-N 


Input question responses. 


3510 AZ$(LEN(AZ$)+N1)=STR$(QV) 


1 


3100 ? :? :IF TON2 THEN 3160 


3520 IF T=N1 THEN AZ$(LEN(AZ$)+N1)=STR 


5100 ? A«(JJ»N38-N37,JJIN38):IF PEEK(N 


3110 ? " ANSNER CHOICES "!NC=N1 


»(TF):BOTO 3580 


84)>I9 THEN ? •?";!6ET IMi,L:? CHR1U5 


3120 ? NCi". •;!60SUB NlOO 


3530 I»="00"!l»(N3)=STR»(Al)!AZ»(LEN(A 


6); 


3130 IF 1$="" THEN ? S»!NC=NC-Nl!GOTO 


Z$)+N1)=I$(LEN(I»)-N2,LEN(I*)) 


5110 NEXT J 


3160 


3540 1(=NC:IF T=N3 THEN )(=NN 


5120 IF HSONO THEN ? "HINT (PENALTY"" 


3140 AP=AP+Nl:A*(APtN38-N37,APtN38)=I* 


3550 AZ$(LEN(AZ$)+N1)=STR»(X) 


;HP;"/10)':? :? H*(ItN38-N37,ItN38) 
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TRICKY TUTORIALS (tm) 

There are many things that the ATARI computers can do either better, or easier 
than other small computers. The following series of programs is designed for 
anyone who is at least familiar with BASIC programming. What each (utonal otters 
is similar to an extensive magazine article with all discussion in as simple 
language as possible, plus you get MANY examples already typed in and running. 
The instruction manuals range from 10 to 50 pages, and some tutorials fill up a 
complete tape or disk. There is little overlap in what is taught, so anyone wanting 
to know all they can should buy them all (my banker thanks you). ATARI buys 
these from us to use in training their own people! Rave reviews have been pub- 
lisheO in ANTIC, ANALOG, CREATIVE COMPUTING, and even INFOWOflLD. You 
trust INFOWORLD, don't you? 

TT #1 : DISPLAY LISTS— This program leaches you how to alter Ihe program in the 
ATARI that controls the formal of Ihe screen. Normally, when you say "Graphics 
8' ', the machine responds with a large Graphics 8 area at the top ol the screen and 
a small text area a! Ihe bottom. Now. you will be able to mix various Graphics 
modes on the screen at the same lime. The program does all of the difficult things 
(like counting scan lines). You will quickly be able to use the subroutines included 
in your own programs. 
16K Tape or 24K Disk. S19.95 

TT #2: HORIZONTAL/VERTICAL SCROLLING-The information you put on the 

screen, eilher GRAPHICS or TEXT, can be moved up, down, sideways, or 
diagonally. We provide the basic methods and leave the resi up to your skill and 
imagination. Includes 18 examples to gel you started, with several using a small 
machine language subroutine for smoothness. 
16K Tape or 24K Disk, $19.95 

TT #3: PAGE FLIPPING-Now you don'; have to redraw Ihe screen every time you 
change Ihe picture or text. You will learn how to have the computer draw the next 
screen you wani lo see while you are siill looking at the previous screen, then flip 
10 it instantly. You won't see il being drawn, so a complicated picture car seem to 
just appear. Depending on your memory size and which graphics or text modes 
you are using, you can instantly look al up to 50 pages. The basic method takes 
only 9 lines and the usefulness is infinite. 
16K Tape or 24K Disk. $19.95 

TT #4: BASICS OF ANIMATION— This program shows you how to animate simple 
shapes (with some sound) using the PRINT and PLOT commands, and it also has a 
nice little PLAYER/ IVIISSILE GRAPHICS game you can learn from. The P/ IV! exam- 
ple is explained and will get you started on this complicated subject (more fully 
explained in TT #5). This would be an excellent way to start making your programs 
come alive on the screen with movement! Recommended for beginning users, 
16K Tape or 24K Disk. $19.95 

TT #5: PLAYER/MISSILE GRAPHICS-Learn to write your own games and other 
animated applications! The tutorial begins with many small examples that compli- 
ment the 50 page manual, then gradually builds up to a complete game where 
everything you need to know is fully explained. Also included are two machine 
language utilities Ihat you can use lo animate Players with from BASIC. Next we 
include two of the best editors currently available: one for editing playfield shapes 
(backgrounds): and one to edit your players, and all in glorious Technicolor!! 
Everything except the two editors run in 16K Tape or 32K Disk. S29.95 

TT #6: SOUND AND MUSIC— Unless you have spent many years experimenting 
with Ihe lour voice channels, you will learn a lot from this one! Learn to play stan- 
dard notes, chords, and whole songs using some simple "tricks". One ol the 
nicest parts are the examples of special sound effects that you can refer to 
whenever you need a sound for a program or to impress a friend. This program will 
be of interest lo all ages and levels of experience! 
16K Tape or 24K Disk. $19.95 

SPECIAL DISCOUNT 
Order the first six tutorials in a 3-rJng binder far $99.95, a $30.00 savings! 

TT #7: DOS UTILITIES-We at Educational Software have been shocked by some 
of the prices others are charging to offer you small utilities to help in Ihe use of 
your Disk Drive. We now offer you all of the following plus explanation as to how 
each was written, and how to use them; A UNIQUE fvlENU PROGRAM, AN 
AUTORUU.SVS BUILDER, DISK INSPECTOR (LOOK AT SECTORS), DISK JACKET 
PRINTER, AUTOMATIC FORMATTER. RECORD SAVE AND LOAD UTILITY. 
32K Disk Only. $29.95 



MASTER MEMORY MAP (tm) 

This book is the most valuable source ol information for 
your ATARI you can buy. It starts out by explaining how 
to PEEK and POKE values into memory, so that even new 
computer owners can usemany of these 'Tricks". Then 
you are given 32 pages of Ihe memory locations that are 
the most useful, along with hints on how to use many of 
the locations. Finally, it includes hints on problems you 
may be having with the computer and discusses the new 
Graphics modes 9 to 11 , Even ATARI buys this book from 
us! $6.95 

USER SUBMITTED PROGRAMS— 

MINI-DATABASE/DIALER-stores and edits up to 8 
lines of information such as names & addresses, phone 
numbers, messages, inventories, or anything you want. 
It has Ihe usual sort, search, and print options, but it 
also has an unusual feature: If your file includes phone 
numbers and your phone company allows touch-lone 
phone Signals, the program will DIAL THE PHONE 
NUMBER FOR YOU! 16K Tape or 24K Disk. $24.95 

THE GRAPHICS MACHINE-allows the ATARI to act like 
more expensive graphics computers using simple com- 
mands like line, box, circle, polygon, fill, and 
savescreen lo gel a high resolution picture you can save 
on disk in only five seconds! Many more features! 48K 
Disk Only. $19.95 

BOB'S BUSINESS- 14 small business type programs 
accessed Irom a common menu, 16K Tape or 32K disk. 

$14,95 

OUR NEWEST PROGRAMS 



DOG DAZE- Two cute little doggies race for the fire 
hydrants, shool Itieir bones, and just have a lot of fun! A 
last action program for all ages. 8K Tape or 16K Disk, in 
mactime language. $16,95 

- OUR BEST GAME * 
SPACE GAMES-Our family is being attacked by 
ALIENS, and only you can save us. A comic book manual 
will guide you through Ihree games that test your ability 
in space skills. Includes ALIENS, SURVIVE, and ROBOT 
ATTACK, and is for all ages. The tirst two games require 
16K for Tape. The last game and all Disk users need 
32K. $24.95 

MATHS FOR FUN-Another ENGLISH import teaching 
basic math skills. Very colorful and enjoyable to use. For 
ages 5 to 16. 16K Tape or 24K Disk. $19.95 



CONTACT YOUR LOCAL 
DEALER or ORDER BELOW 

We have other line programs tor ATARI computers. 
Write lor a catalog. 
Send us your programs to sell loo! 



MINI WORDPROCESSGR-A simple text editor to write, 
save, and print several pages at a time. 32K Tape or 
Disk. $19.95 

KID'S #1-lncludes a MATH QUIZ, a children's 
TREASURE HUNT and a DIALOGUE program. 16K Tape 
or 24K Disk. 3 for. . . $14.95 

KID'S #2-SPELLING BEE, WORD SCRAMBLE, 
and TOUCH, 16K Tape or 24K Disk. 3 Educational games 
for . . . $14.95 

PLAYER PIANO— Turns your keyboard into a mini-piano 
and more. 24K Tape or 32K Disk. $14.95 

GRAPHIC SYMBOL LABELS-for your keyboard to re- 
mind you of the built-in Graphics symbols. 2 complete 
sets for. . . S2.95 



MARATHON— This is a unique math quiz for one or two 
players. You are in a race to move your runner across Ihe 
screen first! There are four levels of play with five modes 
of operation for each. The game uses joysticks for all 
input, so play is easy for young children. This wonderful 
learning tool is imported from ENGLAND for your learn- 
ing pleasure. Your kids will never even notice they are 
playing an EDUCATIONAL program. 16K Tape or 24K 
Disk. $19.95 

GRADE BOOK— This nice record keeper will maintain a 
file of 35 students' test scores along with comments. Up 
to 7 subjects are allowed. 24K Tape or 32K Disk. A 
printer is optional. S24.95 



To order COD, VISA or MasterCard call - (408) 476-4901 

By mail include $3.00 postage (USA only) or $1.50 Memory Map only- 
California residents add 6.5% TAX.— Specify Tape or disk. 




!:&%X<i' 



EDUCATIONAL SOFTWARE inc. 

5425 JIGGER DR. 
SOQUEL, CA 95073 
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Sm POKE CRS,HU? "I PRESS ft KEY TQ C 
ONTINUE f ;;6ET iNl.L 
5140 NEXT I 
5150 RETURN 

Save test file data. 

6000 6RAPHICS N0:P0KE CRS,N1:P0SITI0M 
N2,N5:? 'USE FILE NAME ";F»;"?":6ET 
#N1,L:IF LON89 THEN 60SUB 2000 

Check password. 

6020 IF PMt>" THEN ? :? "USE PflSSNORD 
";PN$;"'?":GET INI, L: IF L=N89 THEN 6 
040 

6030 POKE CRSjHOj? :? "PftSSNORD FOR TH 
IS TEST";! INPUT P« 

Encode password. 

6040 I$=":AZi="00":AZ»(N3)=STR»(QN)!l 
♦(LEN(I$)+Nl)=ftZ$(LEN(AZ*)-N2,LEN(AZ$) 
) 

6045 AZ*='00"!ftZ*(N3)=STR$(ftP)!l«(LEN( 
I»)tNl)=AZ$(LEN(AZ$)-N2,LEN(AZ«) ) : It(L 
ENII$)+Nl)=PMt 

6050 POKE CRS,N1:? :? "SAVINS '";F$;"' 
TO DISK' ■ 
6060 TRAP 6140 

Print data to disk. 

6070 OPEN IN2,8,N0,QF$ 

6110 ? IN2!LM:? IN2iI»:F0R I=N1 TO QN: 

? IN2; Q$ ( I tLNtN48- (LNtN48-Nl ) , I I tLNtN4 

8)-Nl):NEXT I 

6120 FOR I=N1 TO AP:? fN2;A»(IIN38-N37 

,I»N38):NE1{T I 

6130 FOR I=N1 TO QN;? IN2;H»(I»N38-N37 

,ItN38)!NEXT I:60T0 6150 

6140 GOSUB 10100 

6150 CLOSE IN2: RETURN 

Load in oid test file data. 

7000 GRAPHICS NO:? : GOSUB 700 

7010 TRAP 7090 

7020 ? 'INPUT FILE NAIIE'iilNPUT F$:BOS 

UB 15000:P0KE CRS,N1:0PEN IN2,N4,N0,QF 

% 

Decode password. 

7050 INPUT tM2;LN: INPUT IN2;I*:QN=VAL( 
I*(N1,N3)):AP=VAL(I$(N4,6)):PH»=I»(N7) 

Read test file data. 

7060 FOR I=N1 TO QN: INPUT IN2;I»:Q«(II 

LN»N4B-(LNtN48-Nl) , (ItLNIN48)-Nl)=I*:N 

EXT I 

7070 FOR I=N1 TO ftP: INPUT #N2;I«:A«(I« 

N38-N37,I*N38)=I$:NEXT I 

7080 FOR I=N1 TC QN:INPUT iN2;I$:H$(I» 

N38-N37,UN38)=I$:NEXT I:60T0 7100 

7090 IF PEEK(195)=170 THEN ? :? 'FILE 



NOT FOUND '; BEL* : FOR Z=N1 TO 300:NEXT Z 
:60T0 7100 
7095 GOSUB 10100 
7100 CLOSE IN2: RETURN 

Print out test. 

8000 POKE CRS.Nl: POSITION N2,20:? "PLE 

ASE TURN ON YOUR PRINTER":? "THEN PRES 

S ANY KEY";: GET iNl,L:TRAP 8070 

8010 OPEN IN2,8,N0,"P:":F0R I=N1 TO QN 

:I$=Q$(ItLN»N48-(LNtN48-Nl),(ItLNtN48) 

-Nl) 

8020 GOSUB N9tN1000:? IN2iIi". ";!♦:? 

tN2 

8030 IF T=N1 THEN ? IN2;' TRUE':? I 

N2;"_.. FALSE": GOTO 8060 

8040 i7t=N3 THEN ? IN2;' 

_.':60T0 8060 

8050 FOR J=N1 TO N:L=A1+J-N1:? IN2i"_. 

. "iJ;". ';At(L»N38-N37,LtN3B):NEXT J 

8060 ? tN2:? IN2:? IN2:NEXT I: CLOSE IN 

2: RETURN 

8070 TRAP N4»N11000:B0T0 NIOOO 

Separate encoded 
question/response data. 

9000 L=LN»N48-N10:T=VAL(I$(L4-N1,L+N1)) 

:V=VAL(It(L+N2,L+N2)) 

9010 IF T=N1 THEM TF=VAL(I<(L+N3,L+N3) 

);60T0 9030 

9020 ftl=VAL(I$(L+N3,L+N5)):N=VAL(I»(L+ 

6,L+6)):C=VAL(It(L+N7,L+N7)) 

9030 X=N9-N4«!T=Nl):HS=VAL(It(LtX-Nl,L 

+X-N1)):HP=VAL(I»(L+X,L+X)) 

9040 It=I* ( (LNtN48- (LNIN48-N1 ) ) , (LNtN4 

8)-N10) 

9050 RETURN 

Exit from program. 

9900 POKE CRS,M1:P0SITI0N N2,20:? 'DO 
YOU HANT TO QUIT?";:6ET IN1,L:IF L=N89 
THEN END 
9910 RETURN 
Clear to end of screen routine. 

10000 POKE CRS,N1:C0L0R 32:PL0T H,V:DR 
A«T0 N39,V:F0R L=V+N1 TO 23:PL0T NO,L: 
DRANTO N39,L:NEXT L:POSITION H,V:RETUR 
N 

Error trap/display routine. 

10100 TRAP N4tMH000:P0KE CRS,N1:? :? 
' ERROR ■ ;PEEK(195)iBEH;? ' IN LIN 
E "; PEEK i 186) +256»PEEK( 187); BEL* 
10110 FOR L=N1 TO N1000:NEXT L:RETURN 

Read menu heading and options. 
Print heading. 



11000 READ I*,N:V=PEEK(N84):? " 
Print options. 



■;I* 



11010 FOR I=N1 TON 

11020 READ 1$ 

11030 ? ' ';Ij'. •;It 

11040 POKE S,NO:POKE S.NhPOKE S,N2 

11050 NEXT 1 

Display menu prompt. 

11060 POSITION N2,V:? '=>"; 
11070 GET IN1,IT:IT=IT-N4B 
11080 POKE S,NO:POKE S,N1:P0KE S,N2 
11090 IF IT<N1 OR IT>N THEN 11060 
11100 POSITION N2,V:? " ";:VV=V+IT:PO 
SITION N2,VV:? "=>"; 
11110 GET IN1,X 

11120 IF X0155 THEN IT=X-N48:PDSITI0N 
N2,VV:? " ";:GOTO 11080 
11130 POSITION N2,V+N+N2: RETURN 
File name manipulator. 

15000 QF*="D:":QF*(N3,N10)=F*:QF*(LEN( 
BF$)+N1)=".Q':RETURN 

Data for question options. 

20000 DATA QUESTION ENTRY HftIN OPTION 
HENU ,8, ADD TO TEST IN HEHORY.REVIEN 
TEST IN HEHQRY,SAVE TEST TO DISK 
20005 DATA BEGIN A NEW TEST, LOAD A TES 
T FROM DISK, RESET QUESTION ENTRY QPTIO 
MS.PRINT TEST ON PRINTER,QUIT 
20010 DATA QUESTION TYPES .4, NIXED TY 
PES.TRUE/FALSE, MULTIPLE CHOICE,FILL-IN 
20020 DATA QUESTION VALUES ,2, ALL THE 
SANE, VARIABLE 

20030 DATA HINT OPTION ,2,QN,0FF 
20040 DATA HINT PENALTY .2. FIXED PERC 
ENTAGE,VARIA6LE PERCENTAGE 



ATARI® SWAT TABLE FOR: 


CATS DISK VERSION 






SWAT 




LINES 


CODE LENGTH 


1 - 200 


BB 


373 


210 - 550 


SE 


593 


555 - 1120 


KE 


547 


1130 - 2060 


KN 


448 


2070 - 3080 


PU 


371 


3090 - 3200 


AE 


363 


3210 - 3310 


XR 


390 


3320 - 3540 


JH 


362 


3550 - 4030 


LB 


237 


4040 - 5050 


KF 


481 


5060 - 6000 


TR 


446 


6020 - 6150 


m 


460 


7000 - 8010 


YD 


545 


8020 - 9050 


Z6 


472 


9900 - 11060 


SJ 


363 


11070 - 20020 


BH 


536 


20030 - 20040 


SS 


87 
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$ ATARI BASIC $ 

$ 'CATS: TAPE VERSION' « 

$ Author: Alan J. Zett $ 

* (c) 1982, SoftSide » 

3005 REH 

6000 6RAPHICS NO:POKE CRS,M1:P0SIT10N 

N2,N3 

6020 IF P«>" THEN ? :? "USE PASSNORD 

'■;PMi;"?":GET INI, L: IF L=N89 THEN 6 
040 

6030 POKE CRS,NO:? :? "PASSMORD FOR TH 
IS TEST";: INPUT P«$ 

6040 I$="":AZ»="00":AZ*(N3)=STR»(QN):I 
${LEN(I»)+N1)=AZ$(LEN(AZ$)-N2,LEN(AZ$) 
) 

6045 AZ$="00":AZ$(N3)=STR*(AP):I$(LEN( 
I$)tNl)=AZ$(LEN(AZ$l-N2,LEN(AZ$)):I$(L 
EN(I»)+N1)=PH» 

6050 POKE CRS,N1:? :? "POSITION TAPE, 
PRESS RETURN TO SAVE':? 
6060 TRAP 6140 

6070 OPEN IN2,8,N0,"C:":? "SAVINS "; 
6110 ? iN2;LN:? iN2;I«:F0R I=N1 TO QN: 
BOSUB 7095:? IN2iQ$(ItLNIN4B-(LN»N48-N 
l),(IILNtN48)-Nl):NEXT I 
6120 FOR I=N1 TO AP:BOSUB 7095:? IN2;A 
$(ItN3B-N37,ItN38):NEKT I 
6130 FOR I=N1 TO QN:60SUB 7095:? tN2;H 
♦ (I»N38-N37,I»N3B):NE1(T I:BOTO 6150 
6140 BOSUB 10100 
6150 CLOSE tN2: RETURN 
7000 GRAPHICS NO:? : BOSUB 700 
7010 TRAP 7090 
7020 ? "POSITION TAPE, PRESS RETURN TO 

LOAD":OPEN IN2,N4,N0,"C:":? :? "LOADI 
NB •; 

7050 INPUT IN2;LN:INPUT IN2iI»:QN=VAL( 
I»(N1,N3)):AP=VAL(I$(N4,6)):PH$=I$<N7) 
7060 FOR I=N1 TO QN:BOSUB 7095: INPUT * 
N2;I«:Q$(ItLNtN48-(LNtN48-Nl),(ItLNtN4 
8)-Nl)=U:NEKT I 

7070 FOR I=N1 TO AP:BOSUB 7095: INPUT t 
N2;»:A*(ItN38-N37,I»N38)=U:NEXT I 
7080 FOR I=N1 TO QN:60SUB 7095; INPUT t 
N2;I»:H*(I«N38-N37,I»N38)=I*:NE1(T 1:60 
TO 7100 

7090 BOSUB 10100:60TO 7100 
7095 POSITION PEEK(85)-1,PEEK(N84):? C 
HR»(32+128$(INT(I/2)»2=I));:RETURN 
7100 CLOSE IN2:RETURN 
20000 DATA QUESTION ENTRY MAIN OPTION 

MENU ,8,ADD TO TEST IN MEMORY, REVIEW 
TEST IN MEMORY, SAVE TEST TO TAPE 
20005 DATA BE6IN A NEW TEST, LOAD A TES 
T FROM TAPE, RESET QUESTION ENTRY OPTIO 
NS, PRINT TEST ON PRINTER, QUIT 



ATARI® SWAT TABLE FOR: 


CATS TAPE VERSION 






SWAT 




LINES 


CODE 


LENGTH 


I - 200 


CY 


373 


210 - 550 


SY 


593 


555 - 1120 


DZ 


547 


1130 - 3050 


IP 


434 


3060 - 3170 


RR 


352 


3180 - 3280 


ZS 


425 


3290 - 3510 


VO 


315 


3520 - 4000 


EU 


288 


4010 - 5020 


RI 


383 


5030 - 5130 


OC 


519 


5140 - 6120 


KZ 


501 


6130 - 7095 


RD 


521 


7100 - 9020 


YB 


544 


9030 - 11030 


CH 


413 


11040 - 20000 


VR 


363 


20005 - 20040 


IJ 


305 
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$ APPLESOFT BASIC » 

* 'CATS' - DISK VERSION » 
i AUTHOR: JON R. VOSKUIL $ 

* (C) 1982 SOFTSIDE « 
$$t4«$44$$t$$$t($$$($$«$t$$t$$ 

10 6DT0 500 
Custom line input routine. 

100 I* = "":V = PEEK (37) + 1:H = 

PEEK (36) + 1 
110 GET C«:C = ASC (C«): IF C < 
32 THEN 150 

SoftSide 




120 IF C = 34 THEN C = 39:C« = " 

130 IF LEN (II) = 230 THEN PRINT 

BELt;: BOTD 110 
140 I* = I« + C»: PRINT CJj: BOTO 

110 
Process controi commands. 
150 IF C = 13 THEN RETURN 
160 IF C = 21 THEN C = 95:C$ = CHR» 

(C): BOTO 130 
170 IF C = 5 THEN VTAB V: HTAB 

H: PRINT SPC( 255); VTAB V: 
HTAB H: BOTD 100 
180 IF C < > 8 THEN 110 
190 L = LEN (I$): IF L < 2 THEN 

1$ = ": 6CT0 210 
200 I< = LEFT* (1«,L - 1) 
210 IF L > THEN PRINT C«;" "; 

C*; 

220 BOTO 110 

Dispiay titie page and initialize 
program. 

500 TEXT : HOME : VTAB 8 
510 PRINT TAB( 17) "C A T S" 
520 VTAB 12: PRINT TAB( 12) "BY 

JON R. VOSKUIL" 
530 VTAB 18: INVERSE : HTAB 10: PRINT 

■QUESTION ENTRY MODULE": NORMAL 

540 D« = CHR$ (4): PRINT D$"NOMO 

NC,I,0" 
550 DIM Q$(100),A«(300),H«(100), 

T*(3),N$(9),TF*(1) 
560 S* = " 

":U$ = CHR» 

(95):U3» = U* + U$ + U»:QUO* 

= CHR« (34) 
570 T»(l) = "TRUE OR FALSE":T*(2) 

= "MULTIPLE CH0ICE":T«(3) = 

"F1LL-IN":TF*(0) = "FALSE":T 

F*(l) = "TRUE" 
580 KEY = - 16384:PRESS = 128:CL 

R = - 1636B:BR$ = CHR* (93 

) + CHR* (91):S = - 16336: 

BEL* = CHR* (7):B* = CHR* 

(8) 
590 QN = 0:AP = 0: BOSUB 15000 
600 VTAB 24: HTAB 5: PRINT BR*;" 

PRESS ANY KEY TO CONTINUE " 

;BR*;: BOSUB 10000 

Main program loop. 

1000 HOME ; VTAB 5:N* = " QUEST! 

ON ENTRY MAIN OPTIONS MENU " 

;N = 8 
1010 N*(l) = "ADD TO TEST IN MEMO 

RY" 
1020 N*(2> = "REVIEW TEST IN MEMO 

°* continued on page 32 

I 
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I Back Issues 



isr-»from 




August 1980 

"You Can Have Sound" — 

Apple 

"Rom the Robot" — Apple 

"Masters Golf" — ATARI® 

"Grand Prix" — TRS-80® 



September 1980 

"Goal" — Apple 
"Barricade" — ATARI® 
"Concentration 11" — TRS-I 



October 1980 

"Developing Data Base 11" 
All Systems 

"Moonlanding" — Apple 
"World Series" — ATARI® 
"Earth-Port 11" — TRS-80® 



November 1980 

"Developing Data Base III'' 
All Systems 
"Collision" — Apple 
"Trench" — ATARI® 
"Kriegspiel" — TRS-80® 



December 1980 

"Developing Data Base IV' 
All Systems 
"Baseball" — Apple 
"Speedello" — ATARI® 
"Kidnapped" — TRS-80® 
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They're Gone... 
They Gone Forever? 

If you like the programs, reviews, and programming information in tliis 
issue of S of tSide... think of wtiat's waiting for you in past issues! 

Exciting games lilie Defense... Mini-Golf... Micro Man... 

Great Graphics like Old Glory. ..Titan. ..Flight of the Bumblebee... 

PLUS.. .databases, utility programs, educational programs, and more! 

It's all here in the Back Issues of SoftSide magazine. And many of these 
issues are still available for your enjoyment. But not all. Several issues are 
SOLD OUT... others are available but supply is limited. 

So check out the issues and features listed below and order today! 

Back Issues $3.50 ea.* 

Back Issue on cassette $9.95 ea.* 

Back Issue on disk $14.95 ea.* 

Back Issue w/ Enhanced Disk Version 

(contains an additional program) $19.95 ea.* 

Use our bind-in order card provided elsewhere in this issue to order your Back Issue 
copies, cassettes, disk and enhanced disk versions of SoftSide. 

For magazine orders only (minumum 3 issues) send order card and payment to: 
SoftSide Magazine 515 Abbott Drive Broomall, PA 19088 

For magazine plus cassette or disk orders... and enhanced disk orders... send order card 
and payment to: 5o/f5'We Magazine, 6 South St., Milford, NH 03055 

*Prices good for USA orders only — for foreign pricing see page 16 for information. 



January 1981 

"Developing Data Base V" 

All Systems 

"Convoy" — Apple 

and TRS-80® 

"Angle Cannon" — ATARI® 

"Ship Destroyer" — TRS-80® 



February 1981 

"Developing Data Base VI"- 

All Systems 

"Miner" — All Systems 

"Mini-Golf" — ATARI® 

and TRS-80"' 

"Long Distance" — TRS-80® 



March 1981 

"Developing Data Base 
VI I" — All Systems 
"Strategy Strike" — Apple 
and TRS-80® 
"Flags" — ATARI® 
"Volcano" — TRS-80® 



April 1981 

"Battle At Sea" — Apple 
"Convoy" — ATARI® 
"Dominoes" — TRS-80® 



May 1981 

"Galaxia" — Apple 
"Dodge" — ATARI® 
"Orienteering At Jacque's 
Coulee" — TRS-80® 



June 1981 

"Old Glory" — All Systems 
"Word-Search Puzzle 
Generator" — All Systems 
"Anallist" — TRS-80® 



July 1981 

"Chemistry Drill" — All Systems 
"Volleyball" — Apple 
"Space Lander" — ATARI® 
"Word Wars" — TRS-80® 



August 1981 

"Quest 1" — All Systems 
"Shark" — Apple 
"Dairy Farming" — ATARI® 
"Compu-Sketch" — TRS-80® 



September 1981 

"Flip-It" — All Systems 
"Orienteering at Jacques 
Coulee" — Apple 
"Exterminate" — TRS-8C 
Enhanced Disk Version 
"NEWBASIC" — 
TRS-80® Mod-I 



October 1981 

"Leyte" — All Systems 

"Developing Data Base" — Apple 

"Character Generator" — 

ATARI® 

"EnvyrnTM" _ TRS-80® 

Enhanced Disk Versions 

"Super Dairy Farming" — Apple 
"Gameplay" — TRS-80® 



November 1981 

"Flight of the Bumblebee" — 
All Systems 

"Music Machine" — Apple 
"Music Programmer" — ATARI® 
"Music Editor" — TRS-80® 

Enhanced Disk Versions 

"National Anthems" — Apple 
"Volleyball" — ATARI® 
"Mean Checkers Machine" — 
TRS-80® 



December 1981 

"Titan" — All Systems 
"Aircraft Commander" — Apple 
"Developing Data 
Base" — ATARI® 
"Electronics 
Assistant" — TRS-80® 

Enhanced Disk Versions 

"Bobsledding" — Apple 
"Survive" — ATARI® 
"Konane" — TRS-80® 




January 1982 

"Gambler" — All Systems 
"Microtext 1.1" — AH Systems 
"Apple Capture" — Apple 
"Piazza Hotel" — ATARI® 
"TRS-Man" — TRS-80® 

Enhanced Disk Versions 

"Nuclear Submarine Adventure" 

Apple, TRS-80® 

"Death Star" — ATARI® 



February 1982 

"Space Rescue" — All Systems 
"Rubicube" — Apple 
"Defense" — ATARI® 
"Maze Sweep" — TRS-80® 

Enhanced Disk Versions 

"Andorra" — Apple 
"Kismet 11" — ATARI® 
"Help Package" — TRS-80® 

March 1982 

"Hexapawn" — All Systems 

"Magical Shape Machine" — 

Apple 

"Outer Space Attack" — 

ATARI® 

"Killer Cars" — TRS-80® 

Enhanced Disk Version 

"PEEKER/POKER" — Apple 

"Curse of the Pharaoh" — 

ATARI® 

"Warpath" — TRS-80® 



April 1982 

"Microtext" — All Systems 
"Poster Maker" — Apple 
"ATARI® Banner 
Machine" — ATARI® 
"Database" — TRS-80® 

Enhanced Disk Versions 

"Semaphore" — Apple 
"Renumbering for the 
ATARI®" — ATARI® 
"Screen Print" — TRS-80® 



May 1982 

"Solitaire" — All Systems 
"Micro-Man" — Apple 
"Cross Reference" — ATARI® 
"Ladders" — TRS-80® 

Enhanced Disk Versions 

"List Formatter" — Apple 
"Robot Battle" — ATARI® 
"Breakthru" — TRS-80® 



#30 

"Escape from the Dungeons of 
the Gods" — All Systems 
"SWAT" — All Systems 
"Code Breaker" — Apple 
"Sabotage" — ATARI® 
"Piazza Hotel" — TRS-80® 



SoftSide 
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1030 N$(3) = "SAVE TEST TO DISK" 
1040 N$(4) = "BE6IN A NEN TEST" 
1050 )H(5) = "LOAD A TEST FROM DI 

SK" 
1060 N$(&) = "RESET QUESTION ENTR 

Y OPTIONS" 
1070 N«(7) = "PRINT TEST ON PRINT 

ER" 
1080 N»(8) = "fiUlT" 
1100 6DSUB 11010 
1110 IF IT < 4 OR IT > 5 OR ON = 

THEN 1140 
1120 PRINT " ERASES TEST IN ME 

HORY. OK? ': GOSUB 10000: IF 

XI < > "Y" THEN 1000 

Erase old test. 

1130 QN = 0:AP = 0: PRINT : PRINT 
" ERASING TEST ..."|: FOR 
X = 1 TO 100:Q$(X) = "":A»(X 
) = "":A»(X + 100) = "":A$(X 
+ 200) = "":H$(X) = "": NEXT 

1140 IF (IT < 4 OR IT = 7) AND Q 
N = THEN PRINT " NO TES 
T IN HEHORY": FOR Z = 1 TO 1 
000: NEXT Z: GOTO 1000 

1150 ON IT GOSUB 3000,5000,6000, 
3000,7000,4000,8000,9900 

1160 GOTO 1000 

Get file name and check for existing 

file. 

2000 HONE : PRINT "FILE NAME FOR 
THIS TEST:": PRINT : INPUT 

"=> ";F$:QF$ = "9." + F» 
2010 PRINT : PRINT "INSERT INITI 

ALIZED DISK AND PRESS A KEY" 

: GOSUB 10000 
2020 ONERR GOTO 2060 
2030 PRINT : PRINT D$"VERIFY"QF$ 
2040 PRINT : PRINT "BUIZ FILE '" 

F$"'": PRINT "IS ALREADY ON 

THIS DISK. OK TO ERASE?";: GOSUB 

10000: IF X$ < > "Y" THEN 2 

000 
2050 PRINT : PRINT D»"UNLOCK"BF« 

: PRINT D$"DELETE"BF$: GOTO 

2080 

Trap for "File Not Found" error. 

2060 E = PEEK (222): CALL FIX: IF 

E = 6 THEN 2080 
2070 PRINT : PRINT BELt; "ERROR: 

CODE "E: GOSUB 10000: GOTO 2 

000 
2080 POKE 216,0: RETURN 

Ctieck free space. Cancel input if 
none left. 

3000 HONE : PRINT "CHECKING SPAC 
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E ...";: IF FRE (0) < 800 THEN 

PRINT : INVERSE : PRINT BR* 

;' NO HORE ROOM FOR QUESTION 

S "iBR*: NORNAL : FOR Z = 1 TO 

1000: NEXT : GOTO 1000 

If not set, get test file name and 
question options. 

3005 IF SN = THEN GOSUB 2000 
3010 IF NOT EO THEN GOSUB 4000 
3020 QV « 1 

Select questions type and input 
question. 

3030 Al = AP + 1: HONE : INVERSE 
: PRINT ' QUESTION t ■;QN + 
1;": ": NORHAL 

3040 VTAB 3: HTAB 1:X$ = "":! = 
TYPE: IF T = 4 THEN PRINT " 
TYPE? 1=T/F 2=HULTI 3=FIL 
L-IN 0=NENU";: GOSUB 10000: 
T = VAL (X*) 

3045 IF X» = "0" OR X« = CHR$ ( 
13) THEN RETURN 

3050 IF T < 1 OR T > 3 THEN 3040 

3060 VTAB 1: HTAB 20: PRINT T*(T 
): CALL - 958: PRINT 

3070 GOSUB 100 

3080 IF I* = "• THEN 3620 

3090 QN = DN + 1:Q*(QN) = It 

Input question responses. 

3100 PRINT : PRINT : IF T < > 2 

THEN 3160 
3110 INVERSE : PRINT " ANSWER CH 

DICES: ": NORMAL :NC = 1 
3120 PRINT NC". "j: GOSUB 100 
3130 IF I« = "" THEN HTAB 1:NC = 

NC - 1: GOTO 3160 
3140 AP = AP + 1:A«(AP) = I* 
3150 PRINT : IF NC < 9 THEN NC = 

NC + 1: GOTO 3120 
3160 INVERSE : PRINT " CORRECT R 

ESPONSE: ": NORMAL 
3170 ON T GOTO 3180,3210,3230 
3180 INPUT "T OR F? ";X«:X« = LEFT* 

(X*,l): IF X« < > "T" AND X 

» < > "F" THEN 3180 
3190 TF = 0: IF X* = "T" THEN TF = 

1 
3200 GOTO 3280 
3210 INPUT "NUMBER? ";X«:CC = VAL 

(Xt): IF CC < 1 OR CC > NC THEN 

3210 
3220 GOTO 3280 
3230 NN = 0: GOSUB 100: PRINT 
3240 NN = NN + 1:AP = AP + 1:A«(A 

P) = 1$; IF NN = 9 THEN 3270 
3250 INVERSE : PRINT " ALTERNATE 
ANSHER (RETURN IF NONE): ": 
NORMAL : GOSUB 100: PRINT 

SoftSide 



3260 IF I* < > "" THEN 3240 

3270 INVERSE : INPUT " CHARS TO 
MATCH (1-9, RETURN=ALL): ";X 
»:CM = VAL (X«); IF CM > 9 THEN 
CM = 9 

3280 IF HOT HYNT THEN 3350 

Input hint, if applicable. 

3290 INVERSE : PRINT " HINT (RET 
URN IF NONE): ': NORMAL 

3300 GOSUB 100: PRINT 

3310 H$(QN) = I« 

3320 HS « 1: IF I* = "" THEN HS = 
0: GOTO 3350 

3330 IF NOT PFLA6 THEN 3350 

input hint penalty and question 
value. 

3340 INVERSE : INPUT " HINT PENA 
LTY, TENTHS (0-9); "jX*: NORMAL 
:HP = INT ( VAL (X») + ,5): 
IF HP < OR HP > 9 THEN 33 
40 
3350 IF NOT VFLAG THEN 3500 
3360 INVERSE : INPUT " QUESTION 
VALUE: ";X«: NORMAL :QV = VAL 
(X*): IF QV < 1 OR QV > 9 THEN 
3360 

Construct encoded 
question/response data. 

3500 Q* = STR* (T) 

3510 Qt = Q* + STR* (QV) 

3520 IF T = 1 THEN Q« = Q« + STR* 

(TF): GOTO 3580 
3530 X* = "00" + STR* (A1):X* = 
RIGHT* (X*,3):Q* = Q* + X* 
3540 X = NC: IF T = 3 THEN X = NN 
3550 Q* = Q* + STR* (X) 
3560 X = CC: IF T = 3 THEN X = CM 
3570 Q* = Q* t STR* (X) 
3580 Q* = Q* + STR* (HS) 
3590 Q* = Q* + STR* (HP) 
3600 Q*(QN) = B* * B*(QN) 
3610 GOTO 3030 
3620 RETURN 

Select question options. 

4000 HOME : PRINT : RESTORE :E0 = 

1 
4010 GOSUB 11000:TYPE = IT - 1: IF 

TYPE = THEN TYPE = 4 
4020 GOSUB 11000: VFLAG = IT - 1 
4030 GOSUB I 1000: HYNT = 2 - IT 
4040 IF NOT HYNT THEN 4080 
4050 GOSUB 11000:PFLA6 =1: IF I 

T = 2 THEN 4070 
4060 PFLA6 = Os INPUT "HINT PENAL 

TY, TENTHS (0-9): "iHP:HP = 
INT (HP ♦ .5): IF HP > 9 OR 

HP < THEN 4060 
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The Book 

That's an Open Door to the Computer Future 



KIDS & THE APPLE is its name, and its gome is 
to prepare your chiild, or any ctiild, to take 
hiis or Iner place as a member of tlie com- 
puter generation by teaching them the 
mysteries of the Apple* computer in ways 
they'll love and enjoy, Don't be surprised if 
you will also learn along with your child. 

The kids of today are fascinated by com- 
puters to start with. And thafs great, be- 
cause it means they're eager to learn, But, 
until this book by Edward H. Carlson, learn- 
ing about the Apple was a fumbling, 
bumbling effort for o child. 

KIDS & THE APPLE was designed in every 
aspect to lead them gently, interestingly 
yet quickly into the computer world. First, ifs 
a large 872 by 11 book which can be 
opened flat for ease of use. Second, there 
are 35 chapters, each one building upon 
the knowledge ot the prior chapter - and 
ifs loaded with dozens and dozens of car- 
toons which make a point as they amuse. 




At computer stores, or from: 

The educational/book division of 



iDATAMOSl 



9748 Cozycroft Ave. 

Chatsworth.CA 91311 (213)709-1202 



Then, there are special sections for a parent 
or teacher to use so they can work along 
with the kids, if they wish, and help them 
over any rough spots. 

Perhaps the major reasons the kids will love 
this book is that it is truly written so they can 
easily understand it [without a lot of confus- 
ing technical language] . . . and that they 
see on-screen-results almost immediately! 
Right away they realize they'll soon be pro- 
gramming their Apple, making their own 
games! ... or creating other programs for 
school or work or to play. 

The computer world is roaring toward us. To 
be successful at work, school or even play, a 
child will have to be knowledgeable about 
computers. fVlake sure your favorite child is 
prepared for the challenge. With KIDS & THE 
APPLE at his side, he'll enjoy learning and 
you'll know you've prepared him or her for a 
successful future. Only $19.95, 

"Apple is a trademarl< of Apple Computer, Inc. 



4070 VTftB 23: HTftB l: PRINT 'ALL 


Encode password. 


7110 PRINT D«"CLDS£°: POKE 216,0 


OK? •;: GET X«: PRINT X*: IF 




: RETURN 


X$ = "N" THEN 4000 


6040 Xt = "00" + STR« (QN):X$ = 


Print out test. 


4080 IF X* < > "Y" THEN 4070 


RIGHT$ (X*,3):X$ = "00" + STR* 


BOOO VTAB 22: HTAB 1: PRINT "PLE 


4090 RETURN 


(AP) + Xt:X« = RIGHT* (X*,6 
):B»(0) = X* + P«$ 


ASE TURN ON YOUR PRINTER": PRi 
1: PRINT : HOME 


Review test question/response data. 


Print data to disk. 


8010 FOR I = 1 TO BN:6* = fl*(I) 






8020 GOSUB 9000: PRINT I;". "jB* 


5000 FOR I = 1 TO QN: HONE ;B* = 


6050 PRINT : PRINT "SAVING '"F»" 


: PRINT 


B»(I)! 60SUB 9000 


' TO DISK" 


8030 IF T = 1 THEN PRINT U3»"TR 


5010 INVERSE : PRINT I;': ";T$(T 


6060 ONERR GOTO 6140 


UE": PRINT U3*"FALSE": GOTO 


);" VftLUE=";V: NORMAL 


6070 PRINT D»"OPEN"BF$ 


8060 


5020 PRINT B$: PRINT 


6080 PRINT D$"DELETE"BF$ 


8040 IF T = 3 THEN PRINT U3«U3* 


5030 INVERSE : IF T = 1 THEN PRINT 


6090 PRINT D$"OPEN"QF$ 


U3*U3tU3*: GOTO 8060 


"ANSIJER:";! NORHfiL ! PRINT " 


6100 PRINT D*"WRITE"QFt 


8050 FOR J = 1 TO N: PRINT U3*;J 


•TF»(TF)i GOTO 5120 


6110 FOR I = TO BN: PRINT QUO* 


;". "iA*(Al + J - 1): NEXT J 


5040 PRINT "ANSNERS:": NORHAL ! IF 


;Q«(I)!QUO»: NEXT 1 




T = 3 THEN 5080 


6120 FOR I = 1 TO AP: PRINT QUO* 


8060 PRINT : PRINT : PRINT : NEXT 


5050 FOR J = 1 TO N:JJ = Al + J - 


;A$(I)BUO«: NEXT I 


I: PRI 0: RETURN 


1: IF J = C THEN INVERSE 


6130 FOR I = 1 TO BN: PRINT BUO* 




5060 PRINT J;: NORMAL : PRINT ". 


;Ht(I)jQUO$: NEXT I: GOTO 61 


Separate encoded 
question/response data. 


";At(JJ): IF PEEK (37) > 1 


50 




8 THEN FLASH : PRINT " ";: GOSUB 


6140 FLASH : PRINT ; PRINT "ERRO 


9000 T = VAL ( LEFT* (B*,1));V = 


10000: NORHAL : PRINT B$;" " 


R °; PEEK (222): NORMAL : CALL 


VAL ( MID* (8*,2,1)) 


;B$; 


FIX: FOR Z = 1 TO 2500: NEXT 


9010 IF T = 1 THEN TF = VAL ( HID* 


5070 NEXT J: GOTO 5120 


Z 


(B*,3,l)): GOTO 9030 


5080 FOR J = 1 TO N:JJ = Al + J - 


6150 PRINT D$"CLOSE": POKE 216,0 


9020 Al = VAL ( MID* (B*,3,3)):N 


1 


: RETURN 


= VAL ( MID* (B*,6,1)):C = 


5090 L = LEN (A$(OJ)):NC = C: IF 




VAL ( HID* (B*,7,l)) 


NC = OR NC > L THEN NC = L 


Load in old test file data. 


9030 X = 9 - 4 t (T = 1):HS = VAL 


5100 PRINT A$(JJ);: HTAB 1: INVERSE 


7000 PRINT : HOME : ONERR GOTO 


( HID* (8<,X - 1,1)):HP = VAL 


: PRINT LEFT* (A$(JJ),NC):: 


7090 


( MID* (8*,X,1)) 


NORMAL : IF PEEK (37) > 18 


7010 PRINT D*"CATALOG":E = 


9040 8* = RIGHT* (B*, LEN (Q*) - 


THEN FLASH : PRINT " ";: NORMAL 


7020 PRINT : INPUT "FILE NAME: 


X) 


: 6GSUB 10000: PRINT B«;" "; 


fl,";F»:aF* = "B,» + F« 


9050 RETURN 


B$; 


7030 PRINT D$"0PEN"8F» 


Exit from program. 


5110 NEXT J 


7040 PRINT D$"READ"BF$ 




5120 IF HS THEN INVERSE : PRINT 


Decode password. 


9900 VTAB 22: HTAB 1: PRINT " 


: PRINT "HINT (PENALTY="HPV 


DO YOU UANT TO SUIT?": GOSUB 


10):": NORMAL : PRINT H«(I) 


7050 INPUT B*(0):8N = VAL ( HID* 


10000: IF X* = "Y" THEN END 


5130 PRINT : PRINT BR$;" PRESS A 


(B«(0),4,3>):AP = VAL ( LEFT* 


9910 RETURN 


KEY TO CONTINUE "jBR*: GOSUB 


(B*(0),3)):PH* = RIGHT* (0* 


Single cfiaracter input routine. 


10000 


(0), LEN (B*(0)) - 6) 




5140 NEXT I 
5150 RETURN 




10000 POKE CLR,0: WAIT KEY, PRESS 


Read in test file data. 


: GET X*: RETURN 


Save test file data. 


7060 FOR I = 1 TO BN: INPUT 8* (I 


Read menu heading and options. 


6000 HOME : VTAB 5: PRINT "USE F 


): NEXT I 


11000 READ N*: READ N: FOR I = 1 


ILE NAME "F*"' ?": GOSUB 10 


7070 FOR I = 1 TO AP: INPUT A* (I 


TO N: READ N*(I): NEXT I 


000: IF X» = "Y" THEN 6020 


): NEXT I 


Print headings. 


6010 GOSUB 2000 


7080 FOR I = 1 TO BN: INPUT H*(I 




): NEXT I: GOTO 7110 


11010 INVERSE : HTAB 4: PRINT N* 


Clnecl< passvi/ord. 


7090 E = PEEK (222): IF E = 5 THEN 


: NORMAL :V = PEEK (37) 


6020 IF put > •• THEN PRINT : PRINT 


PRINT ! PRINT BEL* + BEL*;" 




■USE PASSHORD '";PW$;"' ?": SOSUB 


FILE '"F*"' NOT FOUND": PRINT 


Print options. 


10000: IF X$ = "Y" THEN 6040 


D*"DELETE'QF*: GOTO 7100 


11020 FOR I = 1 TO N 




7095 FLASH : PRINT : PRINT "ERRO 


11030 PRINT TAB( 4)Ij'. "iN*(I) 


6030 PRINT : INPUT "PASSNORD FOR 


R "jE: NORMAL 


11040 POKE S, PEEK (S) 


THIS TEST: »;PH«: IF PH* = 


7100 CALL FIX: FOR Z = 1 TO 2500 


11050 NEXT I 


'" THEN 6030 


: NEXT Z 


Display menu prompt. 
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11060 VTAB V; HTAB 1: PRINT "=>" 

;: POKE CLR,0 
11070 GOSUB lOOOOsIT = VAL (X*) 

11080 POKE S, PEEK (S) 

11090 IF IT < 1 OR IT > N THEN 1 

1060 
11100 VTAB V; HTAB 1: PRINT " " 

;:VV = V + IT: VTAB VV: HTAB 

1; PRINT »=>"; 
11110 60SUB 10000: X = ASC (K$) 
11120 IF X < > 13 THEN IT = VAL 

m): VTAB VV: HTAB 1: PRINT 

" ";: GOTO 11080 
11130 VTAB V + N + 2: HTAB 1: RETURN 

Poke in stack-fix routine. 

15000 U = "104,168,104,166,223,1 
54,072,152,072,096' 

15010 FIX = 768: FOR I = TO 9:J 
= VAL ( HID* (X*,I 14+1 
,3)): POKE FIX + I, J: NEXT 

15020 RETURN 

Data for question options. 

20000 DATA " QUESTION TYPES ",4, 

HIXED TYPES,TRUE/FALSE,HULTI 

PLE CHOICE, FILL-IN 
20010 DATA " QUESTION VALUES ",2 

,ALL THE SAflE, VARIABLE 
20020 DATA " HINT OPTION ",2, ON, 

OFF 
20030 DATA " HINT PENALTY ",2,FI 

XED PERCENTAGE, VARIABLE PERC 

ENTA6E 



APPLE™ SWAT TABLE FOR: 


CATS DISK VERSION 




SWAT 




LINES 


CODE 


LENGTH 


10 - 200 


JO 


269 


210 - 590 


SO 


488 


600 - 1110 


IF 


400 


1120 - 2040 


FN 


523 


2050 - 3050 


HJ 


435 


3060 - 3170 


YJ 


273 


3180 - 3290 


OU 


388 


3300 - 3540 


2H 


330 


3550 - 4030 


NO 


212 


4040 - 5050 


PY 


365 


5060 - 6010 


HY 


390 


6020 - 6130 


AN 


397 


6140 - 7090 


PH 


397 


7095 - 9010 


HD 


349 


9020 - 11040 


UX 


311 


11050 - 15020 


PO 


303 


20000 - 20030 


DN 


213 



APPLESOFT BASIC $ 

'CATS - TAPE CHANGES' * 
AUTHOR: JON R. VOSKUIL t 
(C) 1982 SOFTSIDE « 
«»t$$t(tt$««t$$$tt*$$*$$$t($$ 



These are the changes necessary to 
adapt CATS for use with cassette. 



DELETE lines 2000 to 2080 



Change the following three lines as 
shown. 



1030 N«(3) = "SAVE TEST TO TAPE" 
1050 N$(5) = "LOAD A TEST FROM TA 

PE" 
3005 REN 

These lines should replace lines 
6000 to 6150 of the disk version. 

6000 HONE : VTAB 6 

6010 IF Pm } " THEN PRINT "US 
E PASSWORD '";PH*;"' ?": GOSUB 
10000: IF X< = "Y" THEN 6030 

6020 PRINT : INPUT "PASSNORD FOR 
THIS TEST: "iP«: IF PH« = 

"" THEN 6020 
6030 X* = "00" + STR« (QN);Xt = 

RIGHT* (X*,3):X* = "00" + STR* 

(AP) + X*:X« = RIGHT* (X«,6 

):Q*(0) = X* + PN« 
6040 PRINT : INPUT "POSITION TAP 

E, START RECORDING, THEN 

PRESS ' RETURN'. "iX* 
6050 PRINT : PRINT "SAVING" 
6060 STORE Q(: STORE A*: STORE H 

*: CALL NR: RETURN 

These lines should replace lines 
7000 to 7110 of the disk version. 

7000 PRINT : HOHE : VTAB 6 
7010 INPUT "POSITION TAPE, START 
PLAYING, THEN PRESS 'R 

ETURN'.'jXt 
7020 FLASH : PRINT s PRINT "LOAD 

ING": NORMAL 
7030 RECALL Qt: RECALL At: RECALL 

H«: CALL RD 
7040 CALL FIX,Q«(0): CALL FIX, A* 

(0): CALL FIX,Ht(0) 
7050 QN = VAL ( HID* (Q«(0),4,3) 

):AP = VAL < LEFT* (Q*(0),3 

)):P«* = RIGHT* (Q*(0), LEN 

(Q*(0)) - 6): RETURN 

These lines should replace lines 
15000 to 15020 of the disk version. 



15000 HR = 76a:RD = BOOrFIX = 865 
:H = HR 

15010 X* = "160,111,162,000,132,0 
60,134,061,160,116,032,025,0 
03,164,111,166,112,132,060,1 
34,061,164,115,166,116,132,0 
62,134,063,076,205,254,160,0 
24,162,000,132,060,134,061,1 
60,029,132,062,134,063,032,2 
53,254,165,028,056,229,024,1 
33" 

15020 GOSUB 15100 

15030 X* = "008,165,029,229,025,1 
33,009,160,002,162,000,056,1 
81,111,149,062,245,008,149,1 
11,149,060,232,136,208,242,1 
65,024,056,229,111,133,006,1 
65,025,229,112,133,007,076,2 
53,254,032,190,222,032,123,2 
21,032,108,221,160,002,165,1 
55" 

15040 GOSUB 15100 

15050 X* = "024,113,155,133,008,2 
00,165,156,113,155,133,009,1 
60,000,177,160,240,015,200,1 
77,160,056,229,006,145,160,2 
00,177,160,229,007,145,160,1 
69,003,024,101,160,133,160,1 
44,002,230,161,197,008,208,2 
20,165,009,197,161,208,214,0 
96" 

15060 GOSUB 15100: RETURN 

15100 FOR I = TO 54:J = VAL < 
HID* (X*,I t 4 + 1,3)); POKE 
H + I,J: NEXT :H = H + 55: RETURN 



APPLE™ SWAT TABLE FOR: 


CATS TAPE VERSION 




SWAT 






LINES CODE 


LENGTH 


10 - 200 


JO 


269 


210 - 590 


SO 


488 


600 - 1110 


ID 


400 


1120 - 3040 


01 


553 


3045 - 3150 


TX 


261 


3160 - 3270 


YC 


389 


3280 - 3520 


EV 


325 


3530 - 4010 


AT 


226 


4020 - 5030 


VE 


352 


5040 - 5150 


RU 


381 


6000 - 6140 


AR 


460 


6150 - 8040 


HC 


404 


8050 - 11000 


YY 


362 


11010 - 11120 


FF 


250 


11130 - 15030 


KA 


516 


15040 - 20030 


JZ 


515 
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TRS-80' 


1 OUESTION TVPE8 1 | QUESTION VdUES | 
W 1 - HIXD TVPES 1 - Mi THE fldC 
2 - TRUE/FMJE W 2 - VMINLE 


tt(tt(tt$($$($$t$tnt$t$n$$t$ 


» TRS-80 Model I/III BASIC « 


3 • HLTini CHOICE 


« "CATS" $ 


4 - FOL-IH 


< Author; Jon R, Voskuil ♦ 




t Translated: Alan J. Zett t 




« (c) 1982, SoftSide » 


iHOnOPTIWI IHINTPEIM.TVI 




r 1 - ON r 1 - FDD PBKBnME 


10 60TD500 


2-OFF 2-«MIMLEFBKEIimE 


Custom line input routine. 


^^^^m. 


100 I»="":L=PEEK(li41i)+PEEK(14417)«256-153i0;V=INT(L/A4):H=L-i4 


MINT PEMLTV IN TENTHS? (l-») 5 


no PRINTCHR»(14)|:C«=INKEyt:IFC»=""THEN110ELSEC=ASC(C$) 




115 IFC<32THEN150 


mm? 


120 IFC=34THENC=39:C$="" 




130 IFLEN(I«)=230THEN110 
140 lt=l»+C»:PRINTC«i:S0T0110 






Process control commands. 




150 IFC=13THENPRINTCHR»(15);)RETURN 


1040 Nt(4)="BEGIH A NEN TEST" 


IfcO IFC=21THENC=95!C»=CHR$(C)!60T0130 


1050 N$(5)="L0AD A TEST FROM DISK" 


170 IFC=5THENPRINT8VtM+H,CHR$(31))!PRINT8Vti4+H,!:eOT0100 


1040 N»(4)='RESET QUESTION ENTRY OPTIONS" 


180 1FCO8THEN110 


1070 N«(7)="PRINT TEST ON PRINTER" 


190 L=LEN(I$)!lFL<2THENI»="":S0T0210 


1080 N»(8)="QU1T" 


200 1J=LEFT«(1$,L-1) 


1090 ONERRORBOTOO 


210 IFL>OTHENPRINTC«" "C*; 


1100 V=3!BOSUB11010 


220 60T0110 


1110 IF1T<40RIT>50RQN=0THEN1140 


Display title page and Initialize program. 


1120 PRINT" ERASES TEST IN MEMORY. OK? ";:60SUB10000:IFXt<>" 




Y"THEN1000 


500 CLS:PRINTCHR»(23) 




510 PRINT8152/C A T S" 


Erase old test. 


520 PR1NT8270,"BY JDN R. VOSKUIL" 


1130 QN=0:flP=0:PRINT"ERASING TEST .,.";:FORl(=lT0100!Qt(X)="":AK 


525 PR I NT J3BB, "TRANSLATION BY ALAN J. ZETT" 


X)=""!A1i(X+100)="";A$(X+200)="":H»(X)="":NEn 


530 PRINTJiSO, "QUESTION ENTRY MODULE" 


1140 IF(IT<40RIT=7)ANDQN=OTHENPRINT" ==== NO TEST IN MEMORY = 


Calculate free string space. 


===';F0RZ=1T0700!NEKT:B0T01000 




1 1 50 ON I TB0SUB3000 , 5000 , 4000, 3000 , 7000 , 4000 , 8000 ,9900 


540 CLEAR OsDIM Qi(100),A$(300),H«(100),TF*(l),T»(3),N(9)iIFHEI1t 


1140 BOTOIOOO 


. 9>32767THENCLEflR327i7ELSECLEARI1EHI . 9 


AlWv WUIUAWV 




Get file name and test for existing file. 


Define variables. 




550 DEFINTft-D,F,6,!-U,«-Z!Al=0!AP=0:CC=0:CH=0!EO=OiEO=0:H=0!HP=0 


2000 CLS!PRINT!lNPUT"FILE NAME FOR THIS TEST"|F$:QF$ = Ft+'/Q" 


:HS=0!HY=0;I=0:IT=0!J=0;JJ=0:L=0:N=0:NC=0:NN=0!PF=0!QN=0:QV=0!T= 


2010 PRINT:PRINT"INSERT STORABE DISK AND PRESS A KEY':60SUB10000 


0!TF=0!Ty=0:V=0!VF=0;VV=0;)«);Z=0!B»=CHR«(8)!C»=""!F$=""!l$="":P 


2020 0NERR0R60T02040 


M«=""i9«="";QFt=""!QU0«=CHR«(34):U3$=STRINB»(3,95):.X$="" 


2030 OPEN"r,l,QF» 


Adjust cursor for Model i or Hi. 


2040 CLOSE:PRINT:PRINT"QUIZ FILE "QUOtFIQUO*" ALREADY EXISTS ON 


THIS D1SK.»:PRINT:PRINT"0K TO ERASE? (Y/N)";SOSUB10000!lFX«="Y"T 


555 I FPEEK (293) =73THENPRINTCHR« (21 ) j ! U«=CHRt (244) +CHRt (245) +CHR$ 


HEN2080ELSE2000 


(24&)ELSELlt="=>° 






Trap for "File Not Found" error. 


Assign string arrays. 




5i0 DIM Q$(100),A«(300),H«(100) 


2040 E=ERR/2-l! IFE=52THENRESUME2080 


570 T$(1)="TRUE OR FALSE":T*(2)="MULTIPLE CH0ICE";T»(3)="F1LL-1N 


2070 CLOSE:PRINT:PRINT"==== ERROR"E"IN LINE"ERL"===="!FORZ=1T013 


":TF«(0)="FALSE":TF$(1)="TRUE" 


00:NEXT!RESUME2OB0 


590 QN=0:AP=0 


2080 CLOSE: RETURN 


400 PRINTS946, "PRESS ANY KEY TO CONTINUE"; :B0SUB10000 


Clieck free question space. Cancel input if no 


Main program loop. 


more room. 




3000 CLS!PRINT"CHECKIN6 SPACE ...•:IFFRE(A»)<744THENPRINT:PRINT" 


1000 CLS!V=3!H=0:N»="flUESTI0N ENTRY MAIN OPTIONS MENU'!N=B 


t NO MORE ROOM FOR QUESTIONS r:FORZ=lT01500:NEXT:BOT01000 


1010 N»(1)="ADD TO TEST IN MEMORY" 




1020 N«(2)="REV1E« TEST IN MEMORY" 


if not set, get test file name and question 


1030 N«(3)="SfiVE TEST TO DISK" 


options. 
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3005 IFQN=0THENBQSUB2000 
3010 IFE0=0THENB0SUB4000 
3020 QV=1 

Input questions and type chosen. 

3030 fll=APtl:CLS:PRINT'QUESTION NUNBER"QN+1 

3040 PRINTJ128.;!T=TYPE:IFT=4THENPRINT"TyPE? 1=T/F. 2=HULTI, 3 

=FILL-IN. 0=NENU";:EOBUB10000:T=VAL(K«):IFX»="0"OR)($=CHR$(13)THE 

NRETURN 

3050 IFT<10RT>3THEN3040 

3060 PRlNTJ32J*(T):PRINTJ128,CHRt(31l: 

3070 BQSUBIOO 

3080 IFI«=""THEN3620 

3090 QN=eN+l:Q»(QN)=I« 

Input questions responses. 

3100 PRINT:PRINT!lFT<>2THEN31A0 

3110 PRINT"flNSHER CHOICES: ":NC=1 

3120 PRINTNC- ";:60SUB100 

3130 IFI»=""THENPRINTJVt64,CHR$(3!):NC=NC-l!B0TQ31i0 

3140 ftP=AP+l!A»{AP)=H 

3150 PRINT: !FNC<9THENNC=NC+1:60T03120 

31t0 PRINT'CORRECT RESPONSE:" 

3170 ONT60T03180,3210,3230 

Input True/False response. 

3180 PRINT-TRUE OR FALSE? (T/F) ■;:BOSUB10000:PRINTB$X$:)(»=LEFT 

«(){«,1):1F)($<>"T'AND)($<>"F'THENPRINTCHR«(27)):60T03180 

3190 TF=0:IF)!»="T"THENTF=1 

3200 B0T03280 

3210 PRINT-NUMBER? •;:BDSUB10000:PRINTB»)!«:CC=VAL()[«):IFCC<10RC 

C>NCTHENPRINTCHR«(27)i;S0TD32!0 

3220 60T03280 

3230 NN=0:B0BUB100:PRINT 

3240 NN=NN+l:AP=AP+l:A$iAP)=I$!lFNN=9THEN3270 

Select an alternate response. 

3250 PRINT-ALTERNATE ANSWER (RETURN IF N0NE):":B0SUB100:PRINT 

3260 IFI«<>"THEN3240ELSEPRINTCHR*(27); 

3270 PRINT-CHARS TO HATCH? (1-9, RETURN=ALL) -|:B0SUB10000:CN=V 

AL()(t):IFCH<10RCM>9THENC«=0 

3275 IFC«=OTHENPRINTB$-ALL"ELSEPRINTB«BtCH 

3280 IFHVNT=0THEN3350 

Input hint If applicable. 

3290 PRINT-HINT (RETURN IF NONE):' 

3300 60SUB100:PRINT 

3310 H«(QN)=I« 

3320 HS=l:IFI»=--THENHS=0;PRINTCHR<(27)i:60T03350 

3330 IFPFLAB=0THEN3350 

Input hint penalty and question value. 

3340 PRINT-HINT PENALTY IN TENTHS (1-9) -:;BOSUB10000:PRINTB$K« 
:HP=lHTWftl.U*i+.5)-.IFHP<10RHP>9THENPRINTCHR«{27);:B0TO3340 



3350 IFVFLAS=0THEN3500 

3360 PRlNT-flUESTION VALUE? (1-9) °!;60SUB10000:PRINTB<X«;QV=i;AL 

(1(«)!IFQV<1QRBV>9THENPRINTCHR*(27):!6DT033AO 

Construct encoded question/response data. 

3500 Qt=RI6HT$(STR«(T),l) 

3510 S«=Q»+RIGHT»(STR«(QV),1) 

3520 IFT=1THENB$=Q»+R!BHT$ (STR«{TF) . 1) :60T03580 

3530 )(t="00"+RIGHT$(STR$(Al),LEN(STR*(Al))-l):l(t=RIGHTt()((,3):B» 

=Bt+Xt 

3540 X=NC:IFT=3THENX=NN 

3550 Q«=et+RI6HT$(STR»(X),1) 

3560 l-^Z'. IFT=3THENX=C!1 

3570 B*=:B»+RIBHT$(STR$(X),!) 

3580 Q$=Q$+R10HT»(S1R«(HS),1) 

3590 B$=Q«+RI6HTt(BTRt(HP),l) 

3600 Q«(BN)=e$+B$(QN) 

3610 BOT03000 

3620 RETURN 

Select question options. 

4000 CLS:REST0RE;E0=1:V=0 

4010 BOSUBl 1 000 : TYPE= I T- 1 : I FTYPE^0THENTYPE=4 

4020 V=0.5:SOSUB11000;VFLA6=IT-1 

4030 V=7!60SUB11000!HYNT=2-IT 

4040 IFHYNT=0THEN4070 

4050 V=7.5:GOBUB11000:PFLAB=1:IFIT=2THEN4070 

40i0 PFLA6=0:PRINT8768,"HINT PENALTY IN TENTHS? (1-9) "!:B0SUB1 

0000:PRINTB«X$::HP=INT(VAL(X$)+.5):IFHP<10RHP>9THEN4040 

4070 PRINT8960,°ALL OK?"::60SUB10000 

4080 !FX$="N°THEN4000ELSEIFX«<>'Y"THEN4070ELSERETURN 

Review test question/response data. 

5000 FORI=lTOQN:CLS!Bt=B»(I):G0SUB9OO0 

5010 PRINT!"- -T$(T)" / VALUE ="V 

5020 PRINT:PRINTB*:PRINT 

5030 IFT=1THENPRINT"ANSWER: "TFt(TF):G0T05120 

5040 PRINT"ANSMERS: ";:IFT=3THEN5080ELSEPRINT 

5050 FORJ=1TOM:JJ=A1+J-1 

5060 PRINTRI6HT»(CHR«(32-10l(J=C))+RI6HTi(STR»(J),l),2)". "A«(JJ 

) ! IFPEEK( 16417) >62THENPRINT-?-; :B0SUB10000:PRINTB$- "B*: 

5070 NEXT!G0T05120 

Calculate portion of response to match. 

5080 PRINT»(HUST MATCH-; :1FC=0THENPRINT" ALL "lELSEPRINTC; 

5090 PRINT-CHARACTERS) ";F0RJ=1TQN;JJ=A1+J-1 

5100 PRINTA$(JJ):IFPEEK( 16417) >62THENPRINT-?-;:6DSUBiOO0O;P»JNTB 

r "BJ: 

5110 NEXT 

5120 IFHS<>OTHENPRINT:PRINT-HINT: (PENALTY =-HP'/ 10)-:PRINTHt(l 

) 

5130 PR1NT:PRINT-PRESB A KEY TO CONTINUE"; ;60SUB10000 
5140 NEXT 
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5150 RETURN 

Save test file data. 

6000 CLS:PRINT8192."USE FILE NAHE "QUO$F«QUO«" ?"iGQSUB10000!lFX 

«="Y"THEMi020 

iOlO GOSUB2000 

Check password. 

i020 IFP«$>""THENPRINT:PRINT"USE PASSWORD "QUO^PHtQUOf ?"!GOSUB 

10000; IFU="Y'THEN6040 

6030 PRINT! IMPUT'PASSHORD FOR THIS TEST"iP»«!!FPMt=""THEN6030 

Encode password. 

6040 XJ=R!6HTtr00"+RlGHT»(STR*!QN),LEM(STR1i(QN))-l),3):Q$i01=RI 
6HT$(°00'+fiISHT$(STR«(AP),LEN!STR«(AP) )-!)+)[♦, 6)+P« 
6050 PRlNTtPRINT'SAVINS "QUO»F«QUO»" TO DISK" 
6060 0NERRDR60T06140 

Print data to disl<. 

6070 0PEN"Q",1,QF» 

6110 F0RI=0T0QN!PRlNTil,QUO«Q$(I)QU0t!NE)(T 

6120 FORI=lTOAP!PRINTtl,QUOtA»(I)QUOt:NEn 

6130 F0RI=lT0QN;PRINTIl,QLlO«Ht(l)QU0«:NEU!60T0615O 

6140 CLOSE!PRINT:PRINT"==== ERR0R"ERR/2-riN LINE"ERL'===='!FORZ 

=1T01300!NEXT!RESUME6150 

6150 CLOSEsRETURN 

Load in old test file data. 

7000 CLS 

7010 ONERR0R6OT07090 

7020 PRINT8192, "INPUT FILE NAI1E"i:INPUTF»:fiFt=Ft+"/Q" 

7030 0PEN"I",!,QF» 

Decode password. 

7050 !NPUT#l,Q«(0)!QN=VAL!MID«(Q$(0),4,3))!AP=VAL(LEFT«iQ$(0),3) 

):P««=RIGHT»(Q«(0),LEN(Q$(0))-6) 

7060 F0RI=1T0QN:INPUTI1,Q$(I):NEIT 

7070 FORI=lTOAP!lNPUTil,At(!)!NE)iT 

7080 FORI=lTOQN:INPUTIl,H*(I):NEniGOT07100 

7090 E=ERR/2-l!lFE=52THENPRINT!PRINT"==== FILE NOT FOUND ===="!F 

0RZ=!T013O0;NEn!RESUNE71O0 

7095 CLOSE:PRINT:PRINT"==== ERROR"E"IN LINE»ERL""=="!FORZ=1T013 

00!NEXT:RESUI1E7100 

7100 CLOSE: RETURN 

Print out test. 

8000 PRINT9960, "PLEASE TURN ON YOUR PRINTER"; iLPRlNT" ":PR1NT896 

0, "STAND BY, PRINTING TEST ..,"; 

8010 FORI=lTOQN:Qt=fl»(I) 

8020 GOSUB9000!LPRINT1"- "QlsLPRINT" " 

8030 1FT=1THENLPRINTU3»'TRUE"!LPRINTU3$"FALSE'!60T08060 

8040 IFT=3THENLPRINTU3»U3»U3tU3*U3»!6OT0B060 

8050 F0RJ=1T0M!LPRINTU3«J"- "AKAl+J-DsNEXT 

8060 LPRINT" ":LPRINT" "iLPRINT" "!NEXT!RETURN 

Separate encoded question/response data. 

9000 T=VAL(LEFTt(Q$,l))!V=VAL(MID«(Q«,2,l)) 

9010 IFT=lTHENTF=VAL(l1ID»{Qt,3,l))!G0T09030 

9020 Al=VAL(l1IDt(8»,3,3)):N=VAL(NID»(B«,6,l))!C=VAL(HID$(Q»,7,l) 

) 

9030 X=9+4«(T=l);HS=VAL(HID«(Qt.X-l.l))!HP=VAL(NID»{B«.X,l)) 

9040 fl«=RI6HT*(B»,LEN(B»)-X) 

9050 RETURN 



Exit from program. 

9900 PRINTS896,"D0 YOU WANT TO QUIT?"!G0SUB10000!lFX«=:"V"THENCLS 

:FRINTCHR»(21)i!END 

9910 RETURN 

Single character input routine. 

10000 Xt=INKEYt:IFXt=""THEN10000ELSERETURN 

Read menu heading and options. 

11000 READNt:READN:FORI=lTON!READN«(I):NEXT 

Print headings. 

11010 PRINT3Vt64+4,CHR«(143)" "N$" "CHRtlHS); 

Print options. 

11020 FORI=1TON 

11030 PRINTS(V+I)»64+3,r- "NKDj 

11050 NEXT 

Display menu prompt. 

11060 PRINTJV>64,U«i 

11070 GOSUB10000!lT=VAL(X$) 

11090 IFIT<10RIT>NTHEN11060 

11100 PRINTSVI64,' ";!VV=V+IT!PRINT9VV»64,U»i 

11110 60SUB10000!X=ASC(X«) 

11120 IFX<>13THENIT=VAL(X*)!PRINTJVV*64,' "i!GOT011090 

11130 PRINT3(V+N+2)t64,;:RETURN 

Data for question options. 

20000 DATA QUESTION TYPES,4, NIXED TYPESJRUE/FALSE.HULTIPLE CHOI 

CE, FILL-IN 

20010 DATA QUESTION VALUES,2,ALL THE SANE, VARIABLE 

20020 DATA HINT 0PTI0N,2,0N,0FF 

20030 DATA HINT PENALTY, 2,FIXED PERCENTA6E,VARIABLE PERCENTAGE 



TRS-80® SWAT TABLE FOR: 


CATS DISK VERSION 








SWAT 




LINES 


CODE 


LENGTH 


10 - 


190 


DV 


314 


200 - 


555 


PX 


548 


560 - 


1070 


VA 


477 


1080 - 


2020 


RC 


475 


2030 - 


3050 


BX 


510 


3060 - 


3170 


EU 


273 


3180 - 


3280 


8E 


447 


3290 - 


3530 


NJ 


419 


3540 - 


4020 


HX 


238 


4030 - 


5050 


UQ 


395 


5060 - 


6010 


YB 


398 


6020 - 


7000 


m 


436 


7010 - 


8010 


ZE 


459 


8020 - 


9900 


IN 


400 


9910 - 


llilO 


AT 


252 


11120 - 


20030 


FR 


264 



38 



SoftSide 



« TRS-80 Model I/l II BASIC % 

% 'CATS! TAPE CHANGES" « 

t Author! Alan i. 2ett $ 

« (u) 1982. So^tSJdE $ 

1030 N$!3)="SAVE TEST TO TAPE" 

1050 N«(5)="L0AD A TEST FROH TAPE" 

3005 REM 

6000 CLS 

6010 PRINTJ192,: 

6020 1FF«»)""THENPRINT"USE PASSWORD "QUO»PHtQUO$" ?":60SUB10000: 

IFU="y'THEN6040 

6030 PRINT! INPLlT"PASSHORD FOR THIS TEST"!PH»:IFPI(J=""THEN6030 

6040 X»=RlGHT«("00"+RI6HT$(STR»(BN).LEN(STRt(QN))-l),3):Q»(0)=RI 

GHT«i"00"fRlBHTt(STR$(:AP),LEN(STR«(AP))-l)+)(J,6)+PW« 

6050 PR!NT!PRINT"POSITION TAPE, THEN PRESS <ENTER> TO SAVE":GOSU 

B 10000 

6060 PRINT! PRINT'SAVINfi t'; 

6070 L=PEEK( 16416) +PEEKil64171«256-153t0 

6110 FORI=OTOBN:G0SUB?O95:PRlNT«-l,QUO*Q«iI!QUO<!NEn 

6120 F0RI=lT0AP!G0SUE7095!PRINTI-l,QU0$A»(I)flU0$:NEU 

6130 F0RI=1T0BN:G0SLIB7095!FRINT#-1,BU0«H1{I)BU0«!NEXT 

6140 RETURN 

6150 REM 

7000 CLS 

7010 PRINTil92, "POSITION TAPE, THEN PRESS (ENTER) TO L0AD"!60SUE 

10000 

7020 PRINT: PRINT'LOADING t"; 

7030 L=PEEK(I6416)+PEEK(!6417)»256-15360 

7050 INPUTI-l,Q$(0):QN=VAL(MIDt(Qt(0),4,3)):AP=VAHLEFT«(Q$(0),3 

l)!PW«=RIGHT»(Q$(0),LEN(Q»(0))-6) 

7060 F0RI=lTOQN!GOSUB7095iINPUT«-l,Q»(I)!NEn 

7070 FORI=1TOAP!GOSUB7095:INPUT#-1,A$(I):NEXT 

7080 F0RI=lT0QN:E0SLlB7O95:INPUTI-l,H»(I)!NEn 

7090 RETURN 

7095 PRINTJL,CHR«i42+10t(INT(I/2)»2=I)); 

7100 RETURN 



TRS-80® SWAT TABLE FOR: 


CATS TAPE VERSION 








SWAT 




LINES 


CODE 


LENGTH 


10 - 


190 


DV 


314 


200 - 


555 


PX 


54B 


560 - 


1070 


UY 


477 


lOSO - 


3010 


LT 


474 


3020 - 


3130 


OA 


34i 


3140 - 


3250 


QH 


395 


3260 - 


3360 


HH 


444 


3500 - 


3610 


RO 


273 


3620 - 


5010 


FX 


384 


5020 - 


5130 


HP 


411 


5140 - 


6120 


HL 


412 


6130 - 


7090 


XV 


346 


7095 - 


9020 


VC 


404 


9030 - 


11060 


DN 


291 


11070 - 


20030 


6E 


362 
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ATTENTION 

AUTHORS 



SoftSide Publications is actively seeking 
program, article and review submissions for 
ttie TRS-80®, Apple™ and ATARI® home 
computers. 
• Programs — SoftSide has always been 
the leader in the field of BASIC software. 
BASIC remains our specialty. However, with 
the advent of Disk Version (DV), we can now 
also offer an outlet for Machine Language 
and multiple language programs which do 
not lend themselves to printed versions. 
Games, utilities and educational software, 
as well as any other applications for the 
home computer user are preferred, although 
we will consider virtually any type of pro- 
gram. Hybrid mixes of articles and programs 
are also welcomed. 

Please be sure to include full documenta- 
tion of subroutines and a list of variables, 
also a brief article describing the program. 

• Reviews — Well written, informed reviews 
of all software for the systems we cover are 
a regular feature of SoftSide. Reviewers 
should take into consideration all aspects of 
a particular software package, from speed 
of execution to programming creativity to 
the estimated length of time that the pro- 
duct will hold the customer's interest. 

• Articles — We welcome article submis- 
sions of all types, but prefer those 
specifically geared to the home computer 
market. We give our readers information as 
a first priority, but vary our content to in- 
clude some humor and commentary. 

All text, including documentation and 
descriptive articles for programs, should be 
typewritten and double-spaced. Extra 
monetary consideration will be given to ar- 
ticles and reviews submitted on machine- 
readable media (Scripsit, Super-Text II, etc.). 
Programs should be submitted on a good 
cassette or disk. TRS-80® BASIC programs 
should function under both Level II and Disk 
BASIC. 

Please be sure to pack your cassettes and 
disks carefully and to include your return address 
and phone number. 

Send to: SoftSide Publications 

SUBMISSIONS DEPARTIMENT 
6 South Street 
Mllford, NH 03055 

We regret that due to the volume we receive, 
we are unable to return submissions. 

Be sure to send for our FREE AUTHOR'S 
GUIDE. It further outlines the specifics of our 
submission procedure. 

TRS-80 is a registered trademark of Tandy corporation. 
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Simply the best word processor... anywhere 



For the Apple™ 

No hardware additions 
needed — What you 
see is what you get. 
All functions are 
displayed on the 
screen exactly as they 
appear in print 
including: 

• Underlining 

• Bold 


^H ' r^^^^^i 



Superscript 
Even/normal 
justification 
Lower and } 

upper case 

Block 
movement 
Global replace 
Plus many more 
features 



\Nor6 Handler 

Once you buy a Word Handler \^^^ When upgrades are introduced you are 

don't forget you; our customer service supplied with a replacement disk FREE! ^ -^^ 

department is available daily. We Contact your local Apple"" dealer for a '''v^ ' 



"Word Handler is simply 
the best word processing 
software I could find 
anywhere by far." 

William R. Moroney 

President 
Electronic Funds 
Transfer Association 



A '"^"■'"I'lheCrd Hanger 
Onterfacesj't'^ ^„,es 



support our products. 



demonstration. You'll be glad you did. 



Silicon Valley Systems, Inc. 1625 El Camino Real #4 Belmont, CA 94002 (415) 593-4344 



Silicon Valley Systems 
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GENERAL INFORMATION 

Concerning SoftSide line 
listings, SWAT & Magnetic Media 



Follow these procedures unless otherwise 
instructed by the documentation in the 
magazine. Back issues may differ in some 
details. 

5 fK4r TABLES 

At the conclusion of each line listing of a 
SoftSide program, we include a SWAT 
{Strategic Weapon Against Typos) Table. 
SWATyi&s published in issue #30 of Soft- 
Side and is available as a free reprint. Please 
send a self-addressed, stamped envelope to 
SoftSide Publications, Inc., Dept. SWAT, 

6 South Street, Milford, NH 03055. 

APPLE™ 

Disks are in 13-sector format, created 
under DOS 3.2.1. If your system is set up 
for 16-sector disks (DOS 3.3), first boot 
your BASICS disk or BRUN BOOT13 from 
the System Master Diskette, then insert the 
SoftSide disk. A cover/menu program will 
run automatically. 

Tapes LOAD in the normal manner. Ad- 
vance the tape to the beginning of the lead- 
in tone; stop the tape; insert the plug into 
the EAR jack; type LOAD; start the tape; 
and press RETURN. Side two of the tape is 
a duplicate of side one, unless one or more 
Integer BASIC programs are included, in 
which case side two contains the Integer 
programs. 

ATARI® 

Line Listings use the following conven- 
tions in representing unprintable 
characters, unless otherwise noted: 

Characters (including blank spaces) 
which are underlined should be typed in in- 
verse video. 

When graphics or control characters are 
to be included in a string (between quota- 
tion marks), it will be noted in a nearby 
REMark. In such cases, graphics characters 
are represented by the corresponding lower- 
case letter, and control characters are 
represented by the corresponding unshifted 
key symbol. For example: The lower-case 
letter s represents a control-down-arrow, 
entered by first pressing and releasing the 
ESC key, then holding down the CTRL key 
and pressing the = key. (See Appendix F, 
and the back cover, of the A TARI® BASIC 
Reference Manual.) 

The one exception to the above practice is 
' that a dear-screen character (ESC 
CTRL-^ ) is represented in listings by a 
right-hand brace, which looks like this: } 

A shifted = is represented in the listings 
by a vertical line with a small gap in it: \ 

SWAT ~ Before appending SWAT to a 
program in memory, the program to be 
SWATed must first be LISTed to disk or 
cassette (using LIST "D:FILENAME" for 
disk or LIST "C:" for tape). Next, turn the 
computer off, then on again, to clear the 
system and ENTER the program back into 



memory (using ENTER "D: filename" for 
disk or ENTER "C:" for tape). Because of 
the unique method in which ATARI® 
BASIC stores variables in a program, the 
variable table must always be in the same 
order to produce accurate SWAT codes. 
LISTing and ENTERing the program is the 
only known way to rebuild the variable 
table in a specific order so that SWAT 
codes can match. 

Disks do not contain DOS. SYS files, and 
are therefore not bootable by themselves. 
First boot a disk which contains any version 
of DOS, then insert the SoftSide disk and 
RUN "D:COVER" {Adventure of the 
Month — RUN "D:INTRO"). 

Tapes CLOAD in the normal manner. If 
you have difficulty, try this procedure: 

(1) Type POKE 54018,54 and press 
RETURN. 

(2) Turn up the volume on your TV. 

(3) Type CLOAD and press RETURN 
once. 

(4) Press the PLAY button and listen. 

(5) When you hear a steady lead-in tone, 
press RETURN again. 

Side two of the tape is a duplicate of side 
one. 

TRS-80® 

Disks are available in Model I or Model 
III format. They contain the DOS PLUS 
operating system, and a cover program 
which automatically runs upon booting. 
Back issues prior to May, 1982, are 
available only in Model I format, and may 
be converted using the TRSDOS CON- 
VERT utility on a two-drive Model III. 
Older back issues (with Model I TRSDOS) 
require you to enter BASIC and then type 
RUN "COVER". 

Tapes CLOAD in the normal manner on 
Model I's, and at low speed (500 baud) on 
Model Ill's. The first program is a 
cover/menu program. Side two of the tape 
is a duplicate of side one. 

NOTES ABOUT MAGNETIC MEDIA 

SoftSide disks and tapes are duplicated 
by reUable, professional duplication ser- 
vices; bad copies are very rare. However, 
the trip through the mail occasionally 
wreaks havoc with sensitive magnetic 
media. If, after a reasonable number of 
tries and a careful check and cleaning of 
your equipment, you are not able to load a 
program from a tape or disk, please return 
it to us with an exact description of the 
problem. If we cannot duplicate the pro- 
blem on our systems, we will advise you 
when we send the replacement copy. 

We use no copy-protection on our media. 
We urge you to make a backup copy of 
every disk or tape as soon as you receive it 
(and at the same time resist the urge to give 
copies to friends). Our replacement policy 
does not extend beyond 30 days. 
SoftSide 
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K-Byter 



Snake Scramble 



An Apple^"*^ K-Byter by Leonard 
Vincent, W. Hollywood, CA 

In this fast-moving action game, 
you are a hungry snake trying to 
gobble up fallen apples. You use the 
traditional I-J-K-M diamond of 
keys to turn up, down, left, and 
right. Every time you take a "byte" 
out of an apple, you score points 
and another apple falls somewhere 
on the playfield. Be careful. If you 
cross your own path or hit the walls, 
the game is over. You can cross your 
path only if an apple has landed 
on it. 

10 6R : POKE - li302,0: CALL - 

im-.n = - IsZY = 0:X = 38 

:Y = 20; COLOR= 2! HLIN 0,39 

AT 0: HLIN 0,39 AT 47: VLIN 

0,47 AT 0! VLIN 0,47 AT 39 

= RND (1) t 30 + 5:B = RND 

(1) » 40 + 3: COLOR= 15: PLOT 

A,B: COLOR= 13: PLOT A - 1,B 

- 1: PLOT A + 1,B + 1: PLOT 

A - 1,B + l! PLOT A + 1,B - 

1 

COLOR= 1:Z = SCRN< X,Y): IF 

Z = 2 OR Z = 1 THEN POKE - 

163&8,0: 60T0 100 

PLOT X,Y: IF Z = 15 OR Z = 13 

THEN no 

50 K = PEEK ( - 163B4): IF K < 1 

27 THEN 90 
60 K = K - 128: A» = CHR* (K): IF 
A$ = "I" THEN ZY = - 1:ZX = 




20 A 



30 



40 



70 



80 



83 



85 



IF At 


IF A$ 

1 
IF At 

- 1 



= "M" THEN ZY = IsZX = 



"K" THEN ZY = 0:ZX = 



= "J" THEN ZY = 0:ZX = 



IF At = CHRt (32) THEN X = RND 
(1) t 35 + 2:Y = RND (1) I 
40 + 5: POKE - li368,0 
90 X = X + ZXsY = Y + ZY:SC = SC + 
h FOR T = 1 TO 2;S = PEEK 
( - 16336): NEXT T: GOTO 30 
TEXT : HOME : VTAB 12:PAt = 
"SCORE - ■ + STRt (SC): HTAB 
20 - LEN (PAt) / 2: PRINT " 



100 



SCORE 



II 



INVERSE : PRINT 
SC: NORHAL : PRINT : HTAB 7: 
PRINT 'PRESS ANY KEY TO CON 
TINUE'i: GET At: RUN 
110 X = X + ZX:Y = Y + ZY: PRINT 
CHRt (7)i:SC = SC + 1000: FOR 
T = 1 TO 10:S = PEEK ( - 16 
336): NEXT T: GOTO 20 © 
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The LatestWord.. . 

CCN provides news from the world of educational computing 
almost as quickly as it happens. Six issues from September to June, 
bring you the latest in developments in software, hardware and 
educational applications. Every issue is filled with program listings, 
software reviews, interviews, news, and commentary providing edu- 
cators with ideas and practical suggestions for using computers. 




D^SiW * ' * ^^ ^^ LastWord 

The 1983 Classroom Computer News Directory of Educa* 
tional Computing Resources is the most complete, up-to-date 
listing of people, places, and things needed by computer-using 
educators. Compiled over the course of a year and updated and 
checked for accuracy immediately before publication, this 150 plus 
page volume contains hundreds of thoroughly annotated educa- 
tional computing resources and thousands of educational comput- 
ing listings, arranged for quick and easy use. 

In A Money Saving Offer. 

Order a subscription to CCN now and you may also order a copy of the directory at 30% off or more. 
See price information below and fill out the coupon at right to subscribe to CCN and reserve your 
copy of the Directory at this special low rate. 






SPECIAL DIRECTORY PRICES 
WITH CCN SUBSCRIPTION 

1 YEAR, 6 ISSUES, U.S. 
no. of subs, per sub. per Directory 



1 - 10 
11-20* 
21 -40* 

■4 1 or more 



$16 $6.98 

$13 $4.98 

$11 $4.50 

$8 $4.25 



These prices are in addition 
to the prices listed above 

For Canada and Foreign (surface mail) 

add $5 per subscription and $2 per Directory 

Payments must be in U.S. dollars 

drawn on a U.S. bank 

*Plus I FREE subscription for your personal use 

for every order of ii or more subscriptions. 
List recipients of multiple orders on separate sheet. 

Hardcover copies available 
at $29.95 each 

including postage & handling 



Yes, I would like to subscribe to Classroom Computer Ne*vs for one year and 
receive a discount on the 1983 Directory due to be mailed in August. One 
Directory May Be Ordered Per Subscription. 

D New Order □ Renewal D Check enclosed D Bill me/my school 

Subs @ $ ea. and Directory @ $ ea. $ 



Hardcover copy @ $29.95 ea. $ 

total 

List recipients of multiple orders on separate sheet. 
Payments must be in U.S. dollars drawn on a U.S bank 
Make checks payable to: Classroom Computer News 
51 Spring St., Watertown, MA 02172 

Name 



School/ Co mpany 
Dcpi . 



Address 



Give street address for UPS 



Zil, 



s/s 82 





by Kerry Shetline 

Applesoft Extensions is a group 
of Machine Language utilities re- 
quiring a 32K Apple™ with Ap- 
plesoft and disk drive. It is included 
as the bonus program on this 
month's Apple^'^ Disk Version. 

Applesoft Extensions is a set of 
Machine Language routines de- 
signed to add three new features to 



HIMEM, and that HIMEM then be 
set to point to the memory just 
below the code. The following pro- 
gram lines will accomplish just that: 

100 LINE = PEEK (116) » 25i + PEEK 
ai5): IF PEEK (LINE) < > 
li9 OR PEEK (LIME + 165) < 
> 198 OR PEEK (LINE + 346) 
< > 96 THEN LINE = LINE - 
347: HIHEH: LINE: PRINT CHRt 
(4)'BL0AD APLEXT.N,A'LINE 



The line input statement allows 
you to input a string and have all of 
the characters, including quotes, 
commas, and colons, entered as part 
of that string. All ESC key cursor 
movements are available. The state- 
ment works by calHng the monitor 
GETLN routine, and assigning a 
string to the contents of the input 
buffer. There is no removal of 
leading or trailing blanks, and no 
checking for delimiters. This is very 
useful for reading text files, and 



Applesoft; a line input statement, a 
MID$ assignment statement, and a 
statement similar to RESTORE 
which can set the DATA pointer to 
a specific line number. These 
features are accessed with the CALL 
statement, so they will not interfere 
with any "&" routines. The code is 
short, only 347 (decimal) bytes long, 
and relocatable, so that it can be 
placed just about anywhere in 
memory. For safety, I recommend 
that the code be loaded just below 



110 ASSIGN = LINE + 69:RE5TR = LI 
NE + 295 



To avoid lowering HIMEM every 
time the program is run, it checks 
for the presence of the extensions by 
testing a few bytes, then skips the 
loading procedure if the code is 
found. These lines should be placed 
at the very beginning of a program 
to avoid problems with resetting 
HIMEM. 



eliminates the need for using file 
names in a program. The user can 
type a drive specification and 
not get the response "EXTRA 
IGNORED". 

The syntax is: CALL LINE IN- 
PUT svar 

LINE is a variable equal to the 
address at which the extentions code 
is located, and svar is any valid 
string variable. The loading routine 



APPLE™ DV 




listed above sets the variable LINE 
to the proper address (as well as the 
variables ASSIGN and RESTR used 
in the other extension statements). It 
should be noted that LINE INPUT 
generates no prompt. 

The MID$ assignment statement 
allows you to place a string directly 
into another string. 

The syntax is: CALL ASSIGN 
MID$(svar,expr) = sexpr 

ASSIGN is a variable equal to the 
extensions' start address plus 69, 



150 A$ = " AMPLE": CALL 
ASSIGN MID$(A$,2) = "P" 
160 B$ = "BACH": CALL 
ASSIGN MID${B$,3) = "SIE" 

In line 150, "M" is replaced by 
"P", and the result, A$, contains 
the word "APPLE". In line 160, 
"CH" is replaced by "SI", and the 
remaining letter, "E", is placed at 
the end of B$, so the resulting value 
of B$is "BASIE". 

The last extension gives you the 



The function of this statement is 
similar to that of the standard 
RESTORE statement, except that 
you can restore to any line contain- 
ing a DATA statement, rather than 
only restoring to the very beginning 
of all the data. 

Applesoft Extensions support 
normal Applesoft error handhng. 
The "SYNTAX ERROR" message 
will be printed if any of the snytax 
requirements are violated. A 
"TYPE MISMATCH" error will 




svar is any valid string variable, expr 
is a numerical expression, and sexpr 
is a string expression. 

The string that will be changed is 
svar. Expr indicates the position in 
svar where sexpr will be placed. 
Expr may have any value from 1 to 
the length of svar. Sexpr can be any 
string expression so long as placing 
sexpr into svar does not result in a 
string that is longer that 255 
characters. To clarify matters, let's 
look at some examples: 



ability to restore the DATA pointer 
to any line number. 

The syntax is: CALL RESTR 
GOTO linum 

RESTR is a variable 295 greater 
than the starting address of the ex- 
tensions code, and linum is the line 
number where the DATA pointer is 
to be set. The GOTO statement is 
required in the syntax so that 
renumbering utilities will properly 
change the line number reference in 
the statement. 



occur if a numeric variable is used 
for svar, a string expression is used 
for expr, or a numeric expression is 
used for sexpr. An "ILLEGAL 
QUANTITY" error will result if 
expr is outside the valid range. 
"STRING TOO LONG" will be 
generated if the result of ASSIGN 
MID$ is greater than 255 characters. 
Using a line number for linum that 
does not contain a DATA statement 
will cause an "OUT OF DATA" 
error. G 
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by Gary Cage 
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Puzzle Jumble is a graphics game 
for an Apple™ with Applesoft and 
16K RAM. 

If you enjoy puzzles, you and 
your Apple are likely to spend many 
hours together with this game pro- 
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gram. First a picture is drawn on the and the number 5 in the FOR-TO 
screen, using black, white, and statement in line 6040 also need to 
flashing blocks. After you've be changed to reflect the new 
studied the picture for a few number of pictures, 
moments, the computer scrambles it In a future issue of SoftSide we 
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ter. (See, for example, lines 
8060-8090.) If, however, you really 
want to be devious you can use rows 
(either in sequence or not) which are 
identical on the screen, but which do 
NOT have the same initial letters. 
These rows would then need to be 
put into their original order for the 
picture to be correctly solved. 

b) Each of the other 36 characters 
indicates whether the corresponding 
block in the row is to be black (a 
normal space), white (inverse), or 
flashing. An F indicates flashing, a 
colon (:) indicates white, and any 
other character (such as an asterisk) 
indicates black. 

Program Notes 

There are a few PEEKs, POKEs, 
CALLs, and other useful techniques 
used in the coding which may be un- 
familiar to some. In the initializa- 
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I, II: Loop variables. 

LOOP: Number of passes through 

the sound routine. 

MARKS{A): Holds an asterisk for 

puzzle A if it was not completed. 

Nl N2* Puzzle line numbers to be 
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screen window. Line 3110, for ex- Nl$, N2$: Input variables, 
ample, first reduces the width of the NAMES: Author's name (for title 
screen to 36 characters, and then routine), 
moves the left margin four NOISE: Equals -16336, the 
characters to the right. If you want memory address for clicking the 
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broutine, BELLS is assigned 

of CHR$(7), or CTRL-G; 

I this string is then a conve- 

lay of beeping the speaker. 

riable NOISE is also used in 

ing sound; either PEEKing 

^Eing this address will cause 

m the Apple^'^'s speaker. 

e title subroutine, a CALL 

Ls the effect of scrolling the 

ip one line, and a CALL -868 

he current text line from the 

to the right edge of the 

These are handy monitor 

s to remember. 

le instructions and picture 

subroutines, the boundaries 

ext window are manipulated 

)us ways to make screen for- 

easier. As detailed in the 

oft manual, POKEing 

y addresses 32, 33, 34, and 35 

s the left margin, width, top 

, and bottom margin of the 


th 
th 
in 
T 
m 

ac 
ea 
in 
ra 
th 
in 

A] 
BI 
sp 
CI 

CO 

FI 
FF 
sti 
H 
pc 


is i 

an 

ge 

EX 

arg 

Th( 

con 

ch 1 

g it 
ndc 
rou 

a t 

VJS: 
iLl 
eak 
<: I 
rre( 
UE 
IE 
ing 
H 
siti 


s a 
usii 
Ktra 

rc( 

ins 
;pi 
ipli 
■ow 
wi 
m. 
gh 
hor 

PL 

.$: 
er t 
"lag 
:t o 
: D 
Stat 
sfr 

1,1 
ons 


mi 

igl 
sp 
ami 
tot 
izzl 
she 
of 
th 
Th 
witl 
oug 
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Eqi 
ob 
to 
rde 
um 
em 
om 
U: 


jch easier 
PAB or H' 
aces with 
nand restc 
heir norm 
e scrambli 
s its miss 
the puzzle 
another re 
is is repea 
1 all 20 rov 
,hly scram 

Variable 

r's input, 
aals CHR; 
eep when 

check if \ 
V (0 = yes, 
my variab 
snt to clea 

memory. 
Used for 


Wc 

FA] 
eac 
)res 
al\ 
ng 
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an 

)W 

ted 

vs, 

ble 

W) 
pri 

)UZ 

1 = 
lei 
r u 

m 


ly t 
3,c 
hli 

th 
/alu 
sub 
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de; 
sek 

fiv 
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nte 
zle 
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Th 
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NUM: Puzzle number. 

OLD: Holds old value of TST; 

used to see if previous line in 

puzzle is equal to current line. 

PI, P2: Puzzle lines to be 

exchanged in scrambling routine. 

PART: Part of the puzzle (1-20). 

PICS(A): Array of strings 

representing the puzzle. 

SOUND: Dummy variable used in 

speaker clicking loop. 

TIME: Delay loop variable. 

TITLES: Name of program, for 

title routine. 

TMP$: Temporary holding 

variable; used for exchanging 

Duzzle lines. 

TRY(A): Number of attempts to 

Dut puzzle A in order. 

TST: Holds ASCII value, minus 

64, of the first character in each 

PICS element; used in checking the 

correct picture order. 

V, VI, V2: Used for VTAB 

Dositions. 
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» APPLESOFT BASIC 
« 'PUZZLE JUHBLE' 
% AUTHOR: BARY CAGE 
* (C) 1982 SOFTSIDE 

10 GOTO 100 



Subroutine to convert a string to 
inverse, fiashiing, and normai 
spaces, and dispiay a iine on ttie 
screen. 



50 FOR I = 2 TO 37!«» = HID* (P 
IC*(PART),I,1)! IF H« = •:• THEN 
INVERSE 

60 IF «♦ = "F" THEN FLASH 

70 PRINT ■ ■;: NORMAL : NEXT : RETURN 

Main program control section. 




i^ 



s 



100 TEH : HONE 
Initiaiize variables. 

110 GOSUB 1000 

Print the title display 

120 GOSUB 2000 

Print instructions. 

130 GOSUB 3000 

Present puzzles for unscrambling. 

140 GOSUB 4000 

Display the final scores, 

150 8DSUB 6000 
160 VTAB 22: END 

Initialization subroutine. 



1000 DIN PICt(20),NARK*(5),TRY(5 



JOIO BELL* = CHR« (7) 
1020 NANE* = "BY 6. CAGE" 
1030 NOISE = - 16336 
1040 TITLE* = "PUZZLE JUNBLE" 
1050 RETURN 



L^ 








Title subroutine. 

2000 FOR I = 1 TO 12 
2010 V = 12!H = 16 
2020 VI = I:V2 =24-1 
2030 HI = I + 4!H2 = 28-1 
2040 VTAB V! HTAB Hli PRINT TITL 

Et 
2050 VTAB Vl! HTAB H: PRINT TITL 

E* 
2060 VTAB V: HTAB H2: PRINT TITL 

E* 
2070 VTAB V2: HTAB H: PRINT TITL 

Et 
20B0 IF I = 1 THEN FOR TINE = 1 

TO 500! NEU TINE 
2090 IF I = 12 THEN GOTO 2120 
2100 FOR TINE = 1 TO 50: NEXT TI 

HE 
2110 HONE 
2120 NEXT I 
2130 FOR TINE = 1 TO 1000: NEXT 

TINE 
2140 FOR I = 1 TO 5 
2150 LOOP = 5: GOSUB 3500 
2160 CALL - 912 
2170 NEXT I 
2180 VTAB 11: HTAB 20: PRINT '-- 
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2190 VTAB 13: HTAB 20: PRINT BEL 
Lt,. " 

2200 FOR TIME = 1 TO 200: NEXT T 

IHE 
2210 FOR I = 1 TO LEN (NAHE») 
2220 VTAB 12: HTAB 41-1: CALL 
- 868 

SoftSide 



2230 PRINT NIB* (NAHE»,1,I) 
2240 LOOP = 5: GOSUB 3500 
2250 NEXT I 

2260 FOR I = 31 TO 20 STEP - 1 
2270 VTAB 12: HTAB I: CALL - 86 

8 
2280 PRINT NAHE* 
2290 LOOP = 5: GOSUB 3500 
2300 NEXT I 
2310 FOR TIME = 1 TO 1000: NEXT 

TINE 
2320 FOR I = 1 TO 13 
2330 LOOP = 1: GOSUB 3500 
2340 CALL - 912 
2350 NEXT I 
2360 FOR TIME = 1 TO 500: NEXT T_ 

INE 
2370 RETURN 

Instructions subroutine. 

3000 VTAB 8: PRINT "WOULD YOU LI 

KE INSTRUCTIONS? "i 
3010 LOOP = 20: 60SUB 3500 
3020 GET AN* 
3030 IF AN* = "N" THEN GOTO 324 


3040 IF AN* < > "Y" THEN GOTO 

3020 
3050 PRINT AN* 
3060 HOME 
3070 PRINT "INSTRUCTIONS:" 

3080 PRINT " " 

3090 FOR TIME = 1 TO 500: NEXT T 

INE 




>1PPLE 



3100 LOOP = 20! 60SUB 3500 
3110 POKE 33, 3i! POKE 32,4 

VTAB 5; PRINT "PUZZLE JUNB 
LE' IS A 6AHE IN HHICH' 

PRINT "A PICTURE IS SHOMN T 
YOU. NHEN- 

PRINT "YOU PRESS 'B' TO BEG 
IN, THE" 

PRINT "PICTURE IS JUNBLED, 
F0RHIN6 A' 

PRINT "PUZZLE, YOU THEN HA 
VE TO RE-" 

PRINT "CONSTRUCT THE PICTUR 
E IN AS FEU' 

PRINT "MOVES AS POSSIBLE <P 
RESSIN6 'V 

PRINT "ALLONS YOU TO SKIP T 
THE NEXT" 

PRINT "PICTURE)." 

VTAB 20: PRINT " PRESS 'SP 
ACE BAR' TO BE6IN "; 
3220 GET AH$ 

IF AN$ < > CHRt 132) THEN 

GOTO 3220 



3120 

3130 

3140 

3150 

3U0 

3170 

3180 

3190 

3200 
3210 



3230 



3240 


PRINT ANt 




% 


3250 


RETURN 






Sound subroutine. 






3500 


FOR II = 1 TO LOOP 


I^SE^-'"^ 


3510 SOUND = PEEK 


(NOISE) t 


PEEK 




(NOISE) 






3520 


NEXT II 






3530 


RETURN 







Main routine to display puzzles and 
decode them. 



4000 TEXT ! HONE 

4010 FOR NUN = 1 TO 5 

4020 TRY(NUH) = 0!HARK$(HUH) = "" 

4030 ON NUn 60SUB 8000,8200,8400 

,8600,8800 
4040 608UB 5000 
4050 HONE 
4060 PRINT I HTAB lit PRINT "PRE 

SS 'B' TO BEGIN "; 
4070 BET AN« 
4080 IF AN( < > "B" THEN GOTO 

4070 
4090 PRINT AN* 
4100 TEXT : HONE 
4U0 GOSUB 5500 
4120 GOSUB 5000 
4130 CK = 




4140 OLD = 

4150 FOR PART = 1 TO 20 

4160 TST = ASC (PIC»(P(«T)) - 64 

4170 IF TST = OLD THEN GOTO 420 


4180 IF TST < > PART THEN CK = 

ItPART = 20 
4190 OLD = TST 
4200 NEXT PART 

4210 IF CK = THEN SOTO 4330 
4220 HONE 
4230 PRINT : INPUT "EXCHANGE NUN 

BER ('4' TO QUIT) -> ";N1$ 
4240 IF Nit = "l" THEN HARK((NUN 

)="»"! GOTO 4400 
4250 Nl = INT ( VAL (Nit)) 
4260 IF Nl < 1 OR Nl > 20 THEN GOTO 

4220 
4270 VTAB 23: HTAB 1: CALL - 86 

8: INPUT "NITH NUNBER -> ";N 

2t 
4280 N2 = INT ( VAL (N2t)) 
4290 IF N2 < 1 OR N2 > 20 THEN GOTO 

4270 
4300 TNPt = PICt(Nl)!PICt(Nl) = P 

ICt(N2):PICt(N2) = THPt 
4310 TRY (NUN) = TRY(NUH) + 1 
4320 PART = Nl: VTAB Nl: HTAB 4: GOSUB 

50!PART = N2: VTAB N2! HTAB 

4: 60SUB 50: HONE : GOTO 413 


4330 PRINT : PRINT BELLti"YOU CO 

NPLETED THIS PUZZLE IN "jTRY 

(NUN);" TRIES." 
4340 FOR TINE = 1 TO 2000: NEXT 

TINE 
4350 HONE 
4360 PRINT ! HTAB 10: PRINT "PRE 

SS 'C TO CONTINUE "; 
4370 GET ANt 
4380 IF ANt < > "C" THEN GOTO 

4370 
4390 PRINT ANt 
4400 TEXT : HONE 
4410 FRIE = FRE (0) 
4420 NEXT NUH 
4430 RETURN 



Subroutine to display a picture. 





5000 TEXT : HONE 

5010 FOR I = 1 TO 20 

5020 PRINT I 

5030 NEXT I 



5040 POKE 33,36: POKE 32,3 

5050 HONE 

5060 FOR PART = 1 TO 20: GOSUB 5 

0: NEXT >-■: t 

5070 POKE 32,0: POKE 33,40 MS* \ . 

5080 POKE 34,20 MK |i 

5090 RETURN ^ ^»^^ 

Subroutine to scramble the puzzle. 

5500 VTAB 8: HTAB 10: PRINT "NON 

NIXING UP PICTURE" 
5510 FOR I = 1 TO 5: FOR PI = 1 TO 

20 
5520 P2 = INT ( RND (1) » 20) + 

1 
5530 THPt = PICt(Pl):PICt(Pl) = P 

ICt(P2):PICt(P2) = THPt 
5540 NEXT PI, I 
5550 RETURN 

Subroutine to display the scores. 

6000 TEXT : HONE 

6010 HTAB 14: PRINT 'FINAL SCORE 

S' 
6020 HTAB 14: PRINT ' 

6030 VTAB 6 

6040 FOR I = 1 TO 5 

6050 TRYt = STRt (TRY (I)) 

6060 HTAB 5: PRINT "PUZZLE t';I; 
SPC( 17 - LEN (TRYt))}TRYt 
;: IF HARKt(I) = '»' THEN PRINT 
" TRIES "(HARKt(I); GOTO 608 


6070 PRINT • TRIES" 

6080 PRINT 

6090 NEXT I 

6100 VTAB 20: HTAB 5: PRINT "(1) 
PUZZLE NOT COMPLETED" 

6110 RETURN 

String assignment statements for 
defining the pictures. 

Picture #1. 

8000 PlCt(l) = "A;::::::::::::::: 

BOlO PICt(2) = "6:nttt:t!:t:ttU 

t:Utt:::ttUt:tttt:" 
8020 PICt(3) = "C:::t:::»::t:;:t: 

::t::::::::t:::t::;:" 
8030 PICt(4) = "0;::t::itttt;::t: 

::tttt:::::t:::Utt:" 



i 
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8040 PIC*(5) = "E!:i»!;!»i:»!:!»j 

*ti*tfiii>ifai(iiifi 

8050 P1C$(6) = "F!:!«::!t::t;«»»» 
t:Utt:::tUUittU:' 

8060 PICt(7) = "Bt:: 



8070 PIC* (8) = PIC* (7) _g 

8080 PIC«(9) = PIC«(7) M#<5r^ 
8090 PIC*(10) = PIC*(7) ^^]jf 
8100 PIC*(11) = "K::::::t«t»t!;: 

■ iiiitiaiiiai(iia*taiB 

(aaaitiaalttaaaaaiaaf 

8110 PIC*(i2) = "L »:!!::!! 

aaiaaaaaiaaaaaaaiaaii* 

8120 PIC«(13) = "«i::!!!»!:!:::; 

tM:::tttt»::t:::>:::' 
8130 PIC*(14) = ''N::::::tUt::::: 

»:t:::t::!:::»t::»::;" 
8140 P1C«(15) = "0:i;!::«:::!!!< 

tmr.mtU-.'.tttir.t' 
8150 PIC«(li) = "P: U:!:!:!t 

t:tl:i;:::t::::t:::::- 
8160 PIC*(17) = ''Q:::::!tUttt::» 

:::t::tttU:::!t::::>' 
8170 P1C*(18) = "Rt:!:i:!!:!!Ji!: 

::::;:: :i:::::s::i::l' 
8180 PICt(19) = "S««!::!::;!!:::! 

:i:::i::i::i:::::::tf 
8190 PIC*(20) = "T»»t:!!!:ss::!:! 

:::::::::::::::i:!Ur 
8195 RETURN 



Picture #2. 



8200 PIC«(1) = "A!!:::!::!::::::: 



taataaaaaaaaitaa 




8210 P1C»(2) = PIC*(1) 
8220 PIC*(3) = PIC*(1) 



8230 PIC*(4) = PlCXl) 
8240 PICt(5) = 'E::::::!!::;:;!;: 
:tUtii:::::::::::::- 

8250 PIC*(6) = PIC*(5) 
8260 PIC* (7) = PIC* (5) 
8270 PIC*(8) = PIC*(5) 
1 8280 FIC*(9) = "I:: ::::::::: 

■.mumitUimtti' 

8290 PICtdO) = PIC*(9) 

8300 P!C*(11) = 'K::!::::!: 

::tU»!ttt:**t:::i:::- 
8310 PlCt(12) = "L::::i:s!::;»»« 

tttUttttUttt:!::;::' 
8320 PICX13) = PIC*(12) 
8330 PIC*I14) = "Ni;!: 

::Utt:*tti:::::! 
8340 PIC*(15) = ■0:::::!::»tUt» 

ttttUMtt 

8350 PIC*(16) = PIC*il5) 

8360 PICt(17) = "Q«!:::!:::::!::: 

:!tttt:::::::::: ■ 

8370 PIC*(18) = "R::UtUtttttUt 

tttttt:::::::::::;:::- 
8380 PIC*(19) = PIC*(18) 
8390 PIC*(20) = ■7:::::::::j!::;; 

::;::::::: ::ttt' 

8395 RETURN 

Picture #3. 

8400 PIC*(1) = "A!::::!:!!:»««»*t 
ttUtt ::;:::" 

8410 PIC*(2) = PIC*(1) 

8420 PIC*{3) = "C:!:»:!i:::!;«U 
*tt»::i::::;t:t:::::' 

8430 PIC*(4) = PIC*(3) 

8440 PICt(5) = ■£:;!! »t*«»« 

Utttt::::::::::::::' 

8450 PIC*(6) = PICt(5) 



B460 PICt(7) = ■6::::;:!:::ttttt; 

:tUtt::i:i:::::::::' 
8470 PIC*(8) = "HIU:::*!**:!:!:: 

:ii::;tUH*:::tt*tt' 

8480 Pic*(9) = •itmmm-.tsiit 

::::::tttUUttttttt' 

8490 PIC»(10) = "J»«tm«tt;!::t 

itit::::;t*tt»Mttt»' 
8500 P1C*(11) = PIC*UO) 
8510 PICtll2) = "LtMtUI* : 

:::::::Uttt*ttttttU* 
8520 PIC*(13) = PIC*(12) 
8530 PIC*(14) = 'NlUttltttli:::: 

:iU:::UU;:*t»ttttt' 
8540 PIC*(15) = "Oi::::U:::mt« 

m*ttt:::::::::;lt::' 
8550 PIC*(16) = "P:!:!:::::!tmt 

Ummu-.iiUUn::' 
8560 PIC*U7) = ''Q::t:t:t ttt 

UUttUI:::::t:t::i:' 
8570 PIC*(18) = 'R.-itr.lMrjtiU* 

ttttltUt::::::;:::::- 
8580 PIC*(19) = "S:!::;r::i:tm* 

UUttt»*::::::i:::::' 
8590 PIC*(20) = 'T::!!:!!:*!**!** 

UM*tt::i:::!!i::i::- 
8595 RETURN 



Picture #4. 



8600 PIC*(1) = ■AttltttttttUUM 
tUttlltltttUttttlt' 

8610 PIC*(2) = PIC*(1) 

8620 PICt(3) = 'CtUi::::::!::::: 

:::::::s::>::!:::nf 
8630 PIC*(4) = "D«f:s:i::!tt«tt 

tUltttUtt***:::***' 
8640 PIC*(5) = 'EUt::tltt:t::::: 

!:ii:i:::::::t:::U*' 
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6&S0 PICt(&) 
ibbd PIC$(7) 

ttitttt: 
6670 PICt(B) 

:iit::t: 
Bm PIC«(9) 

t!;Utt: 
BiW PIC* < 10) 

ti::t:ti 
8700 PlCtdl) 

ttt!t:tt 
B710 PIC»(12) 



= PIC«(5) 

lttl:t:t:U(' 

= 'HtU::ii::it:i:U 

t::lt>ii:Ut' 

= ■ItM::i:i:iti::U 

tUt:t:::ttt' 

= 'Jtlt::!)!!:!:::) 

:t:tii»ii(UI" 

:tMt:t:::ttt' 

= •ItUr.tiiUUiit 



;ii:::::;!;:>;ti;ttlt' 

8720 PIC«(13) = •nmiiuiiitiiii 

8730 PIC«(H) = PIC«(13) 
8740 PIC»(15) = PIC»(13) 
8750 PIC«(1A) = P1C$(13) 
8760 PIC((17) = ■QtU!i!tii:t:::i 

!:::i:i;:i:3!:l;:>ttt' 
8770 PIC»(18) - 'Rlttti:iititUtt 

nmmnmnr.mv 

8780 PlCtd?) = "SUtt : 

::::s;:::::iii>!:tttt' 
8790 PICt(20) = 'TUUtt::::::!!: 

::::!i:::::::UUUtt' 

8795 RETURN 




Picture #5. g J J^^'^'' ■ 

8800 PIC«(1) = 'Atiiiii::!!::!::: 
::ii!::i::!Mi!:iiit' 

8810 Pic$(2) = 'hiiitmutmut 

tttt!:it::;;:i::i3!;' 
8820 PIC»(3) = 'CiwUtttitMtt:! 

:ttt:::i!::;:tt!::t;' 
8830 PIC$M) = •Hit'.tUttttUUit 

tttl:::::!:is::ii:;!* 

8840 PIC«(5) = 'E:::tttMi»UUit 

tt!tii;:::;:ti:;i:;i' 
8850 PlCt(i) ' 'F:::ttttt:tltt>i« 

tUI:::i:::::::::::t' 
8860 PICt(7) = '6ii:ts:iisi:::i;i 

:!;:;;;:i:it::;)!::t' 
8870 PICt(8) = 'H:MttUtt::>i:it 

tttli::i::::i::i:::!' 
8880 PIC((9) = 'I::it:tUi::s::!t 

:IU:i::::::s:;::i::* 
8B90 PlCt(lO) = 'Ji:itt:U::::!:i 

ttttt:!!!!:::::::::::' 



8900 PlCt(ll) = 'K:::tMit::;::i: 

mataaaaaaaiiaaaaaaa" 
aVaaaitaaaaaJaaaaa 

8910 PIC«(12) = 'L:::!*!*!:;!:::! 
tUtt:;:::;:ii:::;i:t" 

B920 PIC$(13) = 'H::!:::!!::::::: 

8930 PIC»(14) = "Ni:::!:!::!::!:: 
tUtt:UMtittttt;;::' 

8940 PIM(15) = "O::!::;::!!::;;! 
t:t:t:l!t:t:nttt!:::' 

8950 PICt(16) = 'P!::i:i!:ii::::: 

8960 PICta7) = 'Bi::!!:::::::;:: 
t:tit:tit:t:tUtl:;:t' 

8970 PIC«(18) = ■Rt!!!!!!;!:»::i! 
tlttt!ttUt:tMtti:::' 

8980 P1C»(19) = "Sh:!!:!!;»j;::i 

IaaaiBitaiitaaiiaaaat* 
ajiaataiaiaaiaaaaaaa 

8990 PIC«(20) = 'Tii3:::::!i;;:>> 
:!;:::::ii!:ttttt::i:' 

8995 RETURN 



APPLE™ SWAT TABLE FOR: 1 


PUZZLE JUMBLE 




LINES SWAT CODE LENGTH 


10 - 1000 


N6 


180 


1010 - 2060 


TH 


207 


2070 - 2180 


VY 


190 


2190 - 2300 


TX 


202 


2310 - 3040 


RG 


204 


3050 - 3160 


BC 


308 


3170 - 3520 


IE 


272 


3530 - 4100 


PO 


186 


4110 - 4220 


EU 


170 


4230 - 4340 


KG 


410 


4350 - 5020 


IL 


145 


5030 - 5540 


YV 


221 


5550 - 6100 


RE 


245 


6110 - 8100 


U 


484 


81 10 - 8200 


NB 


535 


8210 - 8320 


OJ 


373 


8330 - 8430 


BD 


459 


8440 - 8550 


NA 


537 


8560 - 8660 


TK 


518 


8670 - 8780 


IN 


S41 


8790 - 8880 


FI 


527 


8890 - 8980 


ED 


530 


8990 - 8995 


PV 


59 



Protect 

Your 

Investment 



© 



Protect your SoftSide '| 
back issues (combined 
editions) with these 
sturdy binders. Covered 
with durable wood-grain 
vinyl, each 8'/2 x 11 inch 
binder has an inside 
pocket and clear sleeve 
on the spine which 




you can label for 

easy identification. 

Each binder holds 

12 issues. 

8'/2Xll $7.95 



Please include S2.50 per order 
for shipping and handling. 



See page 16 for 

ordering information & back 

issues bind-in card. 

5oft5ii3e 



6 5outh 5tre«t 
MJIford NH 0305S 
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Win $500! 

The First National Computer Owner Survey 
50 Second Prizes of $10 each! 



In order to keep developing and bringing you very 
special hardware, software and publications, we've 
been commissioned to find out wtiat you, ttie custon>er, 
wants and needs. 

In addition to contributing to ttie computer owners' 
data base, you tiave a chance to win $500... just 
for filling out this sun«y. 

JUST TAKE A FEW MINUTES, ANSWER EVERY APPLICABLE 
QUESTION - YOU MUST TO BE ELIGIBLE - AND MAIL 
TO US NO LATER THAN OCTOBER 31, 1982. FOR 20^ YOU 
COULD WIN HUNDREDS. 



Efltninls muit be computer ownere or usere and onswer every oppllcoble question. 
A random drawing, eligibility approval and list ol winners will be verified by a Notary 
Public. Winners will tie notified by Dec. 31, 1982. Grand Prize winner gives IRV 
Brecbner Enterprises the right to use name and photo In future surveys and 
advertising. No purchase necessary. Limit one entry per person. Entries must be 
postmarked no later than Oct. 31, 1982 and reach us by Nov. 15, 1982. Prizes 
include one cosh award of $500, and 50 cash prizes of $1 each. All survey entries 
become properly ollRV Brechner Enterprises; none will be returned. Ail prizes will be 
awarded by Nov. 31,1 982. Ail Federal, State and Local taxes are responsibility of the 
winner. This contest void where prohibited by law. For a prize winner list, send a 
self-addressed stamped envelope to IRV Brechner Enterprises, Box 264W0B, West 
Orange, N.J. 07052. 



NAME. 



ADDRESS 



CiTY/STATE/ZIP 



AGE_ 



SEX_ 



Circle: SINGLE MARRIED # CHILDREN 

6 7 



COMPUTERS(S) YOU OWN OR USE (Circle) APPLE ATARI TRS-80 IBM PC HEWLETT-PACKARD HEATH ZENITH OSBORNE 

10 11 12 13 14 15 16 17 



XEROX DEC 

1S 19 

# DISK DRIVES- 



TEXAS INST. 

20 



NORTH STAR 

21 



COMMODORE 

22 



VECTOR 

23 



CROMEMCO 

24 



OWN HARD DiSK?_ 



OWN MODEM?- 



OTHER. 
PRINTER BRAND 



OWNED HOW LONG 

25 26 

MONITOR BRAND 



APPROX. # DISKETTES OWNED- 
AMOUNT OF MEMORY (Circle) 



BRAND PREFERENCE- 



OPERATING SYSTEM(S)_ 



8K 

35 



16K 

36 



24K 

37 



32K 

38 



48K 

39 



LANGUAGES YOU PROGRAM WITH OR USE 



(Circle) BASIC 

44 



64K 

40 

FORTRAN 

45 



128K MORE 

41 42 



# DISKETTES PURCHASED/YEAR 

43 



I 



COBOL 

46 



MACHINE 

47 



ASSEMBLER 

48 



FORTH 

so 



ALGOL 

51 



PASCAL 

52 



c 

53 



ADA 

54 



APL 

55 



LISP 

56 



CAI 

S7 



APPROXIMATE NUMBER OF SOFTWARE PROGRAMS YOU OWN PER CATEGORY: 



MONITORS 

49 



DO YOU WRITE YOUR OWN SOFTWARE (Circle) YES 

58 



NO 

59 



YOUR PROFESSION- 



EDUCATION- 



HOBBY- 



BUSINESS. 


GAMES 

61 


HOME USE 


OTHER 



SCIENTIFIC- 



62 
65 66 ~ 

PRIMARY USE FOR YOUR COMPUTER- 



APPROX ANNUAL INCOME (Opitonal)- 



_MOST RECENT EDUCATION LEVEL (Circle) 



HIGH SCHOOL 

70 



SOME COLLEGE 

71 



COLLEGE GRADUATE 

72 



SOME GRADUATE SCHOOL 



MASTER'S DEGREE 

74 



OTHER- 



WHICH PUBLICATIONS DO YOU SUBSCRIBE TO OR READ REGULARLY (Circle oil that apply) APPLE ORCHARD 

76 



BYTE 

77 



COMPUTE COMPUTERWORLD 

79 80 



CREATIVE COMPUTING 

81 



DESKTOP COMPUTING 

82 



INTERFACE AGE 

83 



CALL-APPLE 

78 



MICROCOMPUTING 

85 



MICRO 

86 



MICROSYSTEMS 

87 



NIBBLE 

88 



PEELINGS I 

89 



POPUUR COMPUTING 

90 



INFOWORLD 

84 

PERSONAL COMPUTING 

91 



OTHERS- 



SOFTSIDE 

92 93 

APPROX # COMPUTER BOOKS OWNED- 



WHAT NEW PRODUCTS, IDEAS, HARDWARE, SOFTWARE, PUBLICATIONS, ETC. DO YOU WISH TO SEE COME ABOUT? 
Please be specific and use additional paper if necessary. Staple to suney when completed. 



Signoture . 
Mall all completed surveys by Oct. 31, 1982 to: 
NATIONAL COMPUTER OWNERS' SURVEY • BOX 264W0B • WEST ORANGE, N.J. 07052 
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•Apple, Atari, TRS-80, IBM PC, Hevi/lett-Packard, Heath, Zenith, Osborne, Xerox DEC, Texas Inst., North Star, Commodore, Vector & Cromemco ore aii registered trademarks. 



Quill Folio 




— A Small Investor's Small Portfolio Evaluator 



by Rod Packer 

program was generously given to SoftSide by R. E. Packer, 
\ Marana, AZ. Our thanks to Dr. Packer for allowing us to make 
program available to our readers. 

kFolio allows the amateur investor to fit polished and profes- 
sional programming compactly onto his microcomputer 
screen. It's a learning tool, in barely two dozen easily 
understandable BASIC lines, that may be modified and 
used to sharpen programming skills, and add to investment 
skills for market profits. 

"Readers interested in learning enough programming to customize ttieir investing soft- 
ware may want to invest in ttie whole series, The Computing Investor, or The Investor's 
Computer Handbook. Both are available from The Computing Investor, 29 Estancia, 
Marana, AZ 85238. 



The Need is to: 



Start with clean screen 

Allow more than BASIC'S automatic 10-item list (array): 18 Quotes 

will fit down the screen. .with 4 data for each stock (18 x 4). 

Head the Report.. 

& give starting/ending guidance. 

"Store-up" the 5 sub-headings to be used above each column. 

Use each to head a column, as Its Label. .starting each heading on 
line 3. .tabbing rightward to new column tab. 

Display each heading. .returning to underline it, on screen. 

Reset Vertical Tab down one line for accepting entries. 

For all "N" stocknames, in turn. .tabbing downscreen a line for each. 

Prepare to display at next tab-spot. 

If "counter" V shows loops thru for final time. .go to 

profit-figuring. .return & repeat for next stockname. 

When all figured. .go do profit totals. 

If stocknames already taken, then accept other inputs as numbers, 

indenting a space. .and rejecting non-numerics. 

On 1st time thru loop (V-counter ' 0) accept & print stocknames' 1st 
eight letters onscreen (to column-width). 

If no name or data is entered, then previous name was last item 
number. ..now accept Folio Cash. .change it to a number. .& leave 
data-taking loop. 
Repeat until this column all filled in. 

After a column is done. .tab to next one & count up to next (Vth) 
column.. 

Go back to start its heading & entries. 
Profits Module 



Figure cost as shares held times costquote (1st & 2nd array items for 
each name). .give Cost only 2 decimals for $$." 

Figure Worth now as Shares times current quote.. & make this figure 

Accumulate costs & present worths into a growing folio total for 
each. 

Figure net profit (worth minus cost).. show it for each stock before 
return. 

Totals Display Module 

Show, on bottom screenline (24). .Folio's total worth, including cash. 
..Plus, at mid-bottom, Folio's net profit in dollars and cents. 



..Plus, at right bottom, Percent gain (Folio Total Worth minus Total 
Cost) from cost. .to 1 decimal place in %. 

Hold this Report onscreen until investor gives an input to erase & 
start another. 

Numeric-Input Check Module 

If the entry has no numeric value. .Go back and ask for re-entry. 
If entry is numeric, move to next item. 



Done in BASIC by: 



1 HOHE 

5 DIH Q(1S,4):N = 18:HT = 1 

10 PRINT "QUIKFOLIO REPORT... RETURN KEY ENDS.. 

OR 18TH ITEH" 
95 DftTA »STOCKS,ISHARES,BBT.QTE,QTE.NOW,*PROFIT 

100 READ L$! VTAB 3: HTAB HT 

101 PRINT Lt: HTAB HT: PRINT "======": 

VT = 4 

110 FOR NAHES = 1 TO N:VT = VT + 1 

111 HTAB HT: VTAB VT 

115 IF V = 4 THEN 60SUB 150: NEXT NAUE: 60T0 IB 


119 IF V > THEN HTAB HT + 1: INPUT •"jQ*:9(NA 
,V) = VAL (B»): GOTO 1190 

120 INPUT '"jN*: VTAB VT: HTAB HT: PRINT LEFT« 
(N<,8) + " 

125 IF N$ = "■ THEN N = NAHE - 1: INPUT "CASH BA 
LANCE »"iC«:CASH = VAL (Ct): SOTO 130 

129 NEXT NAHE 

130 HT = HT + B:V = V + 1 

139 BOTO 100 

150 C = Q(NA,1) t Q(NA,2) 

151 C = INT (C » 100) / 100 

155 H = Q(NA,1) t e(NA,3) 

156 H = INT (W I 100) / 100 
160 TC = TC + C:TN = TH + N 

179 P = « - C: PRINT P: RETURN 



180 VTAB 24: HTAB 1: PRINT "TOTAL: $"TH + CASH; 
1B5 HTAB IB: PRINT "NET: ♦" INT <(TH - TC) t 100 

) / 100; 
190 PC = iTN - TC) / TC:PC = INT (PC I 1000) / 1 

0: HTAB 34: PRINT PC"i"; 
199 HTAB 40: 6ET A$: RUN 



1190 IF VAL (Q«) = THEN 111 

1191 60T0 129 
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HAVE WE 

GOT A PROGRAM 

FORYOO IN'82 

Over 150,000 computer owners and novices attended the 1981 
National Computer Shows and Office Equipment Expositions, 
and more than a quarter of a million are expected to be at the 
1982 shows. 
Each show features hundreds of companies using thousands 
0* square feet of display space to showcase and sell millions of dollars 
worth of micro and mini computers, data and word processing equipment, 
peripherals, accessories, supplies and software. 

Under one roof you'll see — and be able to buy — all of the hardware 
and software made by every major computer manufacturer for busi- 
ness, industry, government, education, home and personal use. 
^he show includes computers costing as little as $100 to com- 
puters selling for $150,000. 

Don't miss the coming of the new computers — show up for 
\ the show. Admission is $5 per person and $3 for children. 



Ticket information 

Send $5 with the name of the show you 
plan to attend to National Computer 
Shows, 824 Boylston Street, Chestnut 
Hill. Mass. 02167. Tickets can also be 
purchased at the show. 



Dallas 
Dallas Market Hall 

Thursday-Sunday 

April15-18, 1982 

11 AM to 6 PM Daily 

DIRECTIONS: 

2200STEMMONS FREEWAY 

{AT INDUSTRIAL BLVD) 



Uniondale, Long Island 
Nassau Coliseum 

Thursday-Sunday 

Aprii 22-25, 1982 

11 AM to 6 PM Daily 

DIRECTIONS: TAKE L.I. EXPWY 

TO EXIT 38 NO. STATE PKWY 

TO EXIT 31A MEADOWBROOK 

PKWY SO. TO EXIT M5 

HEMPSTEAD TURNPIKE 



Minneapolis 
Minn. Auditorium 
& Convention Hall 

Third Avenue 

Thursday-Sunday 

September 16-19, 1982 

11 AM to 8 PM Dally 

DIRECTIONS: HWY 94 to 
11th St. Exit to Third Ave. 



Washington, DC 
DC Armory/Starplex 

Across from RFK Stadium 

Thursday-Sunday 

October 28-31, 1982 

11 AM to 6 PM Daily 

DIRECTIONS: 

2001 E. CAPITOL ST SE 

(E. CAPITOL ST EXIT OFF 1-295 

— KENILWORTH FRWY) 



Chicago 

(Arlington Heights) 

Arlington Park Racetrack 

Exhibition Center 

Thursday-Sunday 

November 5-7, 1982 

11 AM to 6 PM Daily 

DIRECTIONS: EUCLID AVE & 

WILKE RD. TAKE NW TOLLWAY 

TO RTE 53 EXIT AT 

EUCLID AVE EAST 



Boston 
Hynes Auditorium/ 
Prudential Center 

Thursday-Sunday 

November 11-14, 1982 

11 AM to 6 PM Daily 

DIRECTIONS: TAKE MASS 

PIKE TO PRUDENTIAL 

CENTER EXIT 



Atlanta 
Atlanta Civic Center 



Thursday-Sunday 
December 9-12, 1982 
11 AM to 6 PM Daily 

DIRECTIONS: 

395 PIEDMONT AVE NE 

(AT RALPH McGILL BLVD) 



The National Computer Shows are produced by Northeast Expositions Inc. who also produce Eleclronica — shows featuring home entertainment equipment and personal 
electronics — which are held annually in major US cities. NEI also produces the Applefest Shows. For more information about any of these events call us at 617-739-2000 
or write to the above address. 



APPiE 



Firebird 



A review by Hartley G. Lesser 



from Gebelli Software. System requirements: 48K Apple 
II or Apple 11 Plus with one disk drive — thirteen or six- 
teen sector controller. Suggested retail price: $29.95. 

Nasir Gebelli's genius, responsible for the creation of 
Space Eggs, Autobahn, Cyber Strike, and Gorgon (to 
name but a few!), bade farewell to Sirius Software not 
long ago. A new software company was to be formed. 
High expectations, based on past performance, awaited 
the company's initial software release. Would the game 
measure up to the high standards synonymous with the 
name Nasir Gebelli? 

The introduction of Firebird from Gebelli Software, 
an arcade-style game, does not have the dynamic dif- 
ference one might have expected, save for the game's 
firefighting theme. Nonetheless, the game is very ex- 
citing, and requires more than a modicum of dexterity 
plus the knowledge of several phrases containing explicit 
utterances symbolic of total frustration. 

The package cover brightly illustrates the game's hero, 
"Piggo the Fireman." An iron-on transfer will be found 
inside, suitable for consignment to a T-shirt or other fine 
garment worthy of this game's logo. Firebird boots 
directly on either thirteen or sixteen sector disks, and the 
player is offered a chance to observe a demonstration 
game controlled by the computer, the outcome of which 
is definitely prophetic. 

The initial graphic representation depicts a seventy-two 
room building. There are eight stories, nine rooms on 
each level. "Piggo" appears to be nothing more than 
one's basic oinker, save for his fireman's hat, fire-jacket, 
and asbestos gloves. 

"Piggo" begins the session loitering at the base of a 
mobile, eight-story high ladder. A helicopter chatters 
noisily above the building, flying back and forth from 
screen edge to screen edge. 

All seems rather peaceful, initially — merely the calm 
before the firestorm, as the demonstration program has 
so aptly demonstrated. A single page of instructions sup- 
plied with the disk clearly indicates that the player's 
responsibilities are two-fold. 

First, "Piggo" must strive to prevent the building 
from burning down. Secondly, the helpless occupants of 
the edifice must be rescued as they leap from their burn- 
ing rooms. 

The arsonist, yet to make its appearance, is something 
called a "Firebird." The picture on the software package 
displays something akin to a wild turkey cavorting across 
the building's rooftop. A fiery wake is dispensed from 
the bird's ....ash-end... which causes the fires to begin 
blazing. An annoyed pig, attired in a firefighting suit, 
stands atop a fire ladder, looking most perplexed. 

The game commences on the press of any key. Within 
seconds, the "Firebird" appears, randomly dropping fire 




on the rooms of the building's upper level. Initial concern 
turns to relief as the gamer notes how easily these first 
few fires are extinguished. However, as the game pro- 
gresses, the bird's speed increases, as do the number of 
fires he's spreading. 

The player manipulates "Piggo" to the burning 
rooms, where the firepig sprays water from the firehose, 
attempting to douse the flames. But, the fires are not 
limited to a single level. Once a room is gutted by fire, the 
space the room occupied is eliminated from the building. 
Should flames drop onto the destroyed section, the next 
lowest level catches on fire! 

"Piggo" is constantly running up and down the lad- 
der, trying to extinguish flames on several different levels 
at once. All the time, additional fires are being started. 

There is more — another responsibility is to try and ac- 
complish rescue of the residents. "Piggo" must be posi- 
tioned to the left side of a burning room in order to catch 
the poor unfortunate leaping to his or her death from the 
blazing apartment. "Piggo," after seizing the victim, 
must then climb the ladder and deposit his passenger 
upon the uppermost rung. The hehcopter will then, and 
only then, pick up the salvaged tenant on its pass 
overhead. If this is accomplished, the chopper will 
deposit an undamaged room onto the building during its 
return flight, in an area where it is needed the most. 
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THE 

"^ ~BIG MATH 
ATTACK™ 

Challenging new math program . . . 

Sharpen your skills by entering the correct answer 

before the equation 'lands' on your cityi Provides 

hours of educational entertainment '^ ^'OW ' 

Features: 

• Full color 

• High resolution graphics 

• Animation 

• Sound 

• Four math functions (+, ■, x, -^) 

• Two levels for each function 

Recommended for grades 1 -6. Available for the ATARI & APPLE II. 

ATARI 16K (cass.) $20.00 

ATARI 24K (disk) $25.00 

Requires ATARI BASIC cartridge 

APPLE II (disk) DOS 3.2/3.3 $25.00 

Requires Applesoft Basic in ROM. 

Ask for it at your local computer store. 





APPLE 



'Kh.e.s.i.s. 



P.O. Box 147 
Garden City, Ml 48135 
(313) 595-4722 



Please add: 

SI. 50 shipping/handling 

$:.50 CO,D. 
WRITE FOR FREE CATALOG 
DEALER INOaiRIES WELCOME 



• K-Byters • K-Byters* 



ANOTHER PROGRAMMING CHALLENGE 

Some time ago SoftSide began inviting its readers to submit 
"One Liners" — self-contained single-line programs for the 
TRS-80®, Apple™, or ATARI® which would provide a con- 
tinuously changing graphics display. The response has been ex- 
cellent, and we're still looking for more submissions. 

Now we have a new challenge for you as well: "K-Byters." 
A K-Byter is a BASIC program which fits into IK (1024) bytes 
of program memory. There aren't any restrictions on the 
nature of the program, other than its size. It can be a graphics 
display, a game, a mini-adventure, or anything your imagina- 
tion and programming skills can create. 

Note that the program does not have to RUN in IK of 
memory; it can use as much RAM for arrays, strings, graphics 
mapping, etc., as you need. We'd prefer that it be able to run 
in a 16K system, but this is not an absolute limit. 

Here then are the official RULES: 

• 1. The program must be written for the Apple^"^, TRS-80®, or 
ATARI®, entirely in BASIC (although it may create and call 
Machine Language routines). 

• 2. The program must occupy no more than 1024 bytes of 
memory before running. 

• 3. The program must be submitted on tape or disk, accom- 
panied by your name, address, phone number, and a brief 
written description of its operation. 

• 4. The tape or disk will be returned only if accompanied by 
a self-addressed envelope with adequate postage AFFIXED 
(do not send money). 

• 5. Winners will have their programs published in SoftSide 
and will receive a $10 software certificate for their program- 
ming excellence! 

Send submissions to; K-Byters, c/o SoftSide, 6 South Street, 
Milford, NH 03055 



Should our brave firepig rescue someone and not take 
him to the top of the ladder, the player will find it im- 
possible to do further combat with tlie flames. There is 
also the possibility of rescuing a second tenant while 
another one clings to the top rung of the ladder, awaiting 
the helicopter. This will totally negate "Piggo's" fire 
fighting abilities, for only one rescue pickup may occur at 
one time. Poor "Piggo" must wait with his latest save 
until the ladder is clear, watching the fire eat away at the 
precious rooms around him. 

Danger abounds, even during a rescue attempt. If 
"Piggo" is standing directly over a flaming apartment 
when a resident jumps from the room, he will be knocked 
from the ladder and will join the panic-stricken tenant in 
a free-fall to the ground. The player has a total of only 
three firepigs for the game, so care must be taken in this 
regard. 



"The game presents an immense 
challenge, not only for point accrual, 
but in learning to maintain and douse 
one's temper while battling the fires." 



"Piggo" is manipulated through the use of the com- 
puter keyboard. The "A" and "Z" keys control move- 
ment up and down the ladder, while the left and right ar- 
rows direct the ladder in corresponding directions. For 
dousing flames, the space bar should be pressed, sending 
a spray of water from the firehose onto the fire. 

Should these particular keys not meet with the player's 
approval, Gebelli has allowed for key redefinition. 
CTRL-C enters this change mode, and the player merely 
types in the keypress desired for the appropriate action. 

The game also includes a fantastic function that will 
save the gamer numerous migraines. What has a player 
had to do in the past when the phone rings, or the 
doorbell announces a visitor, during a hotly contested 
competition? Why, angrily turn off the computer. No 
longer, for Mr. GebeUi has provided an ESC function 
that holds the game indefinitely for the player at the posi- 
tion play was halted. A simple press of the ESC key and 
all activity is frozen and saved, awaiting your return. 

The conclusion of the contest occurs when all three 
firepigs have been lost, or when two or more columns of 
rooms have burned to the ground. If the gamer is able to 
save the bottom level of apartments in an undamaged 
condition, 5000 bonus points are earned, and the game is 
restarted with your score intact. Using a CTRL-R will 
also restart the game at any point, but all accumulated 
points will be lost. 

Points are earned for the following accomplishments: 

1) Quenching a room fire: 25 points 

2) Saving a falling victim: 50 points 

3) Helicopter rescue: 100 points 

The player's reward comes in an improvement of his 
previous score, each time the game is played — no easy 
matter at all. The contest is frustrating, for the chance of 
defeating the "Firebird" is basically nil. The game 
presents an immense challenge, not only for point ac- 
crual, but in learning to maintain and douse one's temper 
while battling the fires. This game is a worthwhile addi- 
tion to any computer gamer's software library. q 
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Z.E.S. - THE ULTIMATE IN COMPUTER AIDED INSTRUCTION 
IS FOR APPLE* COMPUTERS ONLY! 



Avant-Garde Creations announces the Z.E.S. system of 
computer aided instruction from Zenith Coaching in 
Austraiia. 

Z.E.S. is the uitimate educator's or businessperson's tooi 
for creating iessons in any subject WiTH NO PROGRAMM- 
ING KNOWLEDGE NECESSARY. 

Z.E.S. is NOT a language, but a completely menu driven 
system that features: 
> full lesson creationfamendment facilities 

• high resolution graphics and animation in color 

• cartesian graphs 

• full error checking, field delimiters and prompting 

• provisions for hints In each question 

• branching to revision questions (up to 9 revision ques- 
tions for each normal question) 

•ABSOLUTELY NO PROGRAMMING KNOWLEDGE RE- 
QUIRED 

• elaborate student record keeping including: 

1. the student's general status on the lesson 

2. summary of the student's performance 

3. detailed report 

4. student's answers 

5. class report 

The Z.E.S. System consists of 4 disks, the PROGRAM disk, 
the GRAPHICS disk, the MODULE disk and the MODULE 
FORMAT/COPY disk, plus a 130-page manual in deluxe 
ring binder. System Price: $250, Demonstration Pkg: $1 



13 Z.E.S. COURSEWARE MODULES (MAY BE USED ALONE 
OR IN CONJUNCTION WITH THE COMPLETE Z.E.S. 
AUTHORING SYSTEM. ) 29.95 EACH 



1. Phrases and Clauses 

2. Poetry 



8. The Quadratic and the Parabola 

9. Statistics 



3. Inlroduction to Weather Charts to. The Heart 



4. Mechanics and Motion 

5. Electricity 

6. Functions 

7. The Real Number System 



11. The Digestive System 

12. Gas Laws 

13. The Definite Article 



YOU CAN EARN $$$$ CREATING NEW CLASSROOM 
COURSEWARE. Suitable modules created on the ZES 
Authoring System can be entered into our resource 
bank. Teacher-authors receive royalties on any 
courseware they have written. Call for details. 

For your Apple*. All systems and courseware require: 
Applesoft* in ROM, 48K, disl<, DOS 3.2 or 3.3 
Z.E.S. Authoring System $250 

Demonstration Disk $10 

COURSEWARE MODULES: $29.95 each 

Ask your dealer or order direct from: 

Avant-Garde Creations, 

PO Box 30160 Eugene, OR 97403 

(503) 345-3043 



""" ' Visa/Mastercard accepted 



'Apple Is a registered trademari^ of Apple Computer. Inc. 
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by W. Morris & J. Cope 

Tunein is a music/memory game 
program for a 16K ATARI® 
400/800 witli ATARI® BASIC car- 
tridge and one joystick. 

Tunein is a one to four player 
game which tests the player's ability 
to store and recall an increasingly 
lengthy series of musical notes; it 
has been designed to be played by 
people of all ages. In writing 
Tunein, we have attempted to il- 
lustrate how "education" and 
"fun" do not have to be mutually 
exclusive concepts. Properly de- 
signed software in this field should 
allow for both intellectual and emo- 
tional satisfaction without being too 
obvious in realizing either goal. 

Another of our intentions in 
writing this program was to il- 
lustrate, within a program setting, 
how the inherent power of the 
ATARI® can overcome apparent 
limitations of the microcomputer. 
"Limited to only four colors on the 
screen," you say? Well, Tunein 
features eight rectangular boxes of 
eight different colors! The careful 
use of a redesigned character set and 
player/missile graphics made short 
shrift of that difficulty. Similarly, 
the giant cursor, which is central to 
the game, is not done with any 
Machine Language programming 
but instead, uses some redesigned 
characters to accomplish the desired 
effect. Let no one kid you, the 
ATARI® is powerful! 



Game Instructions 

Tunein is a relatively straightfor- 
ward game to learn how to play. If 
you are familiar with the popular 
children's game of "Simon Says," 
you already know most of the 
game's procedure. If not, read 
on.... 

Each game will commence by 
placing eight colored squares about 
the program's title. Each square 
represents one note of a musical oc- 
tave. The ATARI® will cycle a giant 
cursor through each of these squares 
until the player(s) are ready to play. 
The first task facing the player(s) at 
this point is to set the initial playing 
conditions: 

1. Use the SELECT key to in- 
dicate the number of players (1-4). 
You will know the number of 
players for each game by the 
presence of the initial scores in each 
corner. 

2. Once you have selected the 
number of players, use the START 
key to commence play. 

3. After completing one suc- 
cessful turn, the OPTION key will 
allow you to increase the length of 
the series of notes you will have to 
repeat to complete the current level 
and increase your score. The game is 
set to proceed in increments of one 
note (ten points). If, at any time. 



you wish to start another game, use 



the START key to terminate play. 

Each player has three "lives" 
during each game. Just prior to your 
turn, the score display will change to 
indicate the number of lives you 
have left (in asterisks) and the 
number of notes to be repeated in 
order to score. 

To start your turn, press the 
joystick button. The ATARI® will 
flash the program title and play the 
sequence of notes while placing the 
giant "cursor" over one of the eight 
squares. The program title will 
disappear and wait for you to press 
the joystick button to indicate your 
readiness to play. Simply use the 
joystick to move the cursor over the 
appropriate square. Once this has 
been accomplished, press the 
joystick button to finalize your 
choice. A correct choice will result 
in the note being played again. An 
incorrect choice will elicit an ap- 
propriate "raspberry" from your 
ATARI®. 

Each successful turn will result in 
one note being added to the player's 
sequence on the next turn (up to a 
maximum of 100 notes at the first 
level). After the 10th successful 
guess, the increase is by steps of 2 
until you reach 20 after which it in- 
creases by 3 until 30 successive notes 
can be repeated. The increases 
follow a similar pattern until you 
reach 100 successful notes. (If you 
can repeat a 100 note pattern, please 
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contact the Guinness Book of 
World Records! Our best record is 
somewhat lower...) 

As mentioned earlier, using the 
option key at the beginning of each 
turn will allow you to increase the 
length of the sequence you must 
repeat, up to the maximum 
allowable for that level. The game 
has been set to have a "wrap 
around" effect should you try to ex- 
ceed the maximum level. 

An unsuccessful turn will result in 
a repeat of the same level of difficul- 
ty on the next turn unless you have 
exhausted your three lives. Should 
this, in fact, be the case, you are 
eliminated from the game. Tunein 
will continue until all of the players 
have eliminated themselves. It will 
then commence a new game. 

Variables 

J, K: Coordinates for the program 
"cursor". 

LF: The number of lives for each 
player. 

LV: The level of the game (1-4 
player game). 

M: One of eight possible notes to 
be played. 

MM: The number of notes that 
have been repeated by the player 
during his or her current turn. 
N: An array containing the fre- 
quency of one of the eight possible 
notes used in the program. 
NO: The maximum number of 
notes to be played at the current 
level of the program. 
NN: The number of notes to be 
played at each stage during a 
player's turn. 
P: Player counter. 
PM: Player/Missile base address. 
SI, S2: Coordinate points to print 
each player's score. 
SC: Score for each player. 
UU: Base address of redefined 
character set. 

W: Variable set by the joystick to 
indicate the array element of J and 
K to help position the "cursor." 
X$: A "dummy" string used to 
store the Machine Language 
routine used to redefine the 
character set. 

Y$: Another "dummy" string used 
to store the Machine Language 
routine used to clear out the 
player-missile area in memory. 
All other variables are used as 
counters. 
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After clearing the screen and 
inhibiting the cursor, display the 
title page. 

3 ? "}":PQKE 752,!:SETC0L0R 4,3,0:SETC 
QLOR 2, 3, OPPOSITION 17,8:? "TUNE IN" 

4 POSITION 6,18:? "(c) W«. Morris & J, 
Cope 1982"; 

All of the Initial variable values are 
set. 

10 DIH N(IOO), 11(B), Ly(4),N0i4),SC(4),L 
F(4),J(8),K(8),]($(32),Y$(24) 

11 M(1)=60:!1[2)=64:M(3)=72:H(4)=81:I1(5 
)=9!:I1(6)=96:H(7J=108:H(8) = 121 

12 J(1)=9:J(2) = 12:J(3) = 13:J(4) = 12:.1(5) 
=9:.J(6)=6:J(7)=5:J(8)=6 

13 K{1)=1:K(2)=2:K(3)=5:K(4)=8:K(5)=9: 
K(6)=8:K(7)=5:K(8)=2 

After reserving memory space for 
the redefined character set and 
using UU to store the address of the 
top of memory, a full screen 
graphics 2 mode is set and the 
cursor is inhibited. 

20 POKE 106,PEEK(106)-4:UU=256tPEEK(10 
6):eOSUB 20000:6RAPHICS 18: POKE 752,1 



Set all of the color registers to a 
uniform value while other matters 
are attended to prior to start of 
play. 

30 FOR Z=704 TO 712:P0KE Z,48:NEKT I 

After moving the ROM based 
character set into RAM in line 40, 
key characters are redefined to form 
the basis of the flashing cursor in 
the following line. 

40 U=USR(ftDR(X$), 57344, UU):POKE 756,UU 

/256 

50 FOR Z=456+UU TO 4fc3+UU STEP 2: POKE 

Z,85:P0KE Z+1,170:POKE Z+B,255:P0KE Z+ 

9,255:P0KE Z-B,170:P0KE Z-7,85:NEXT Z 

A regular playfield is selected and 
memory is reserved for player- 
missile graphics below our 
redefined character set. The page 
address of player/missile graphics 
address is POKEd into location 
54279, shadow register 623 is set to 
give the redefined cursor priority 
over the player/missile graphic 
figures and their base address is 
calculated in the variable PM. 



60 POKE 559,62:Z=PEEK(106)-12:PQKE 542 
79,Z:P0KE 623,4:PI1=Z»256 



After using the Machine Language 
routine stored at the address of Y$ 
to clear out the player missile area 
in memory, line 80 sets the shape of 
each of the four players to be the 
same as the redefined rectangular 
characters. The size of each of the 
players is set to the same size 
(locations 53256-53259) and their 
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horizontal positions on thie screen 
are set (locations 53248-53251). The 
players are then "turned on" for 
display (location 53277). 

70 U=USR(ADR(Y$),PM) 

80 )(=PM+1024!F0R 2=64 TD 95:P0KE .U2,2 

55:P0KE )(+Z+25fi, 255: POKE )(+Z+608,255:P 

QKE X+I+864,255:NEXT Z 

90 FOR Z=53256 TD 53259!pQKE Z,1:NEU 

2 

100 POKE 53248, 96:P0KE 53249, 144:P0KE 

53250, 96:PQKE 53251, 144:PDKE 53277,3:6 

OSUB 110:B0T0 200 

Subroutine to position the redefined 
rectangles on the screen. 

110 POSITION 9,1:? i6;"22";:POSITION 9 

120 POSITION 5,6:? #6; "_Z2_";: POSITION 5 

,5;? I6;"ZZ' 

130 POSITION 13,6:? l6j":z";:P0SITI0N 

13,5:? t6;"2i"; 

140 POSITION 9,9:? I6;^';:P0SITIQN 9 

,10:? 16; "iz_';: RETURN 

The game screen display is set with 
line 210 setting all of the 
SETCOLOR and player/missile color 
registers. Line 215 checks memory 
location 53279 to see if any of the 
console keys have been pressed or 
if the joystick button has been 
pressed. If not, the program loops 
continually through this line. Line 
230 registers the SELECT button 
being pressed. 

200 PL=3:eOSUE 400:B0SUB 500 

210 POKE 704, 118: POKE 705, 84: POKE 706, 

178:P0KE 707,70:POKE 70S,2B:P0KE 709,1 

32: POKE 710, 250: POKE 711,52 

215 60SUB 10000:IF PEEK(53279)=7 AND S 

TRI6(0!<:>0 THEN 215 

220 BOSUB 300: IF STRIB(0!^0 THEN BQSUB 

500:60TO 1000 
230 IF PEEK (53279) =5 THEN BOSUB 400 
240 BOTO 220 

The redefined characters are first 
printed in line 300 and then printed 
in reverse order in line 310 which 
gives the illusion of a "flashing" 
checkerboard cursor. The remaining 
lines in this section check the 
console registers to see If the game 



should be terminated (lines 320-330) 
or If the number of notes to be 
played at that level of difficulty 
should be changed (line 340). 

300 POSITION 8,5:';' #6;" YY ";:POSITIQN 
9,6:? «6;"YY":F0R U=l TO 30:NEn U 
310 POSITION 9,6:? #6;"KX"i:P08IT10N 9 
,5:? #6;"XX":F0R U=l TO 30:NEXT 
320 IF PEEK (53279) =6 THEN POP :6aT0 20 


330 IF PEEK (53279) =3 AND P=0 THEN POP 
:BOTO 200 

340 IF PEEK (53279) =3 THEN NO(P)=Nn(P)+ 
1:P0P :SQTO 1055 
350 RETURN 
400 FL=PL+1:IF PL=5 THEN PL=1 

The number of players Is registered 
and their initial scores are 
displayed. 

410 POSITION l.O:-' »6;"Q000O ";:POSITI 
ON 14,0:? 16;" ";;P0SITION 1,11:? 

16;" ";:POSITI0N 14,11;? #6;" 

« ■ 

420 ON PL BOTO 460,450,440,430 
430 POSITION 14,11:? t6;"0Q00Q"; 
440 POSITION 1,11:? »6; "00000"; 
450 POSITION 14,0;'' «6;"00Q0Q"; 
460 RETURN 

The Initial parameters for the game 
are set. 

500 FOR P=l TO 4;Ly(P)=l:SC!P)=0:LF!P) 
=3:N0(P) = 1;NEXT P:P=0:RETLIRN 

This line marks the initiation of the 
actual game sequence. The variable 
Y counts the number of players. If it 
is equal to zero, the program exits 
this segment. 

1000 Y=0:FOR 2=1 TO PL;Y=Y+LF{2):NEXT 

Z:IF Y=0 THEN 9000 

1010 P=P+1:IF P>PL THEN P=l 

1020 IF LF(P)=0 THEN 1010 

1030 FOR Z=l TO LV(P)»10;N(Z)=INT!RND( 

0!t8+l):NEXT Z 

1040 S2=0:IF P>2 THEN 82=11 

1050 S1=1:IF P=2 OR P=4 THEN 81=14 

1055 IF N0(Pl>10 THEN N0(P)=1 

The previous score for the current 
player is wiped out and the number 
of lives left in this game are 



displayed along with the number of 
notes to be played in this round. 

1060 POSITION S1,S2:? 16;" ";:Pas 

ITION S1,S2:F0R Z=l TO LFfPS;? »6;"1"; 

:NE.XT Z:? #6;" "; (LV(P)-lltlO+NO(P); 

The accompanying sound to the 
display in line 1060 Is set. 

1070 FOR UZ=15 TO STEP -0.5:F0R L!Y=3 
TO STEP -1; SOUND 0, 15-yY,10,U2:NEXT 
UY:NEXT UZ 

This segment plays the number of 
notes contained in the variable NN 
and places the cursor over the 
appropriate redefined character or 
player/missile rectangle. The 
subroutine in line 110 Is accessed 
after the cursor has been erased to 
reprint the redefined character. This 
procedure is not necessary if the 
cursor has been printed over a 
player/missile character as the 
priority register has been set to 
display the player if no character is 
covering it. 

1100 BOSUB 300:NN=0:IF STRIB(0)<>0 THE 

N 1100 

me SOSUB 2000:NN=NN+Ly(P):FOR 2=1 TO 

4;60SUE 300;NEXT 2;IF NN>LV(P)JNa(Fi 
THEN 3000 

1120 FOR 2=1 TO NN;SOUND 0,M{NfZ)),10, 
8 

1130 POSITION "^ji;^ «6;"IN";:P0SITI0N 
8,5;-;' 16; "TUNE"; 
1140 POSITION J(N(2)),KiN(2));'' i6;"YY 

";:P0S!TI0N J(N(2).i,K(N(2)! + l:? i6;"YV 

fl > 

1150 FOR Y=l TO 100:NEXT Y;PnsiTinN J( 
N(2J),K(N!2)i:? #6;" ';:PQSITION JfN( 
Z)),K(N(2!)+1:? 16;" ";;60SU8 110 
1160 SOUND 0,0,0,0:FOR Y=l TO 10:NEXT 
Y:NEXT 2:1111=0 

Player input is handled within this 
section. Note how line 1200 sets 
memory location 77 to in order to 
prevent the attract flag from being 
set. MM, the number of notes input 
by the player. Is compared to the 
number of notes actually played. If 
it is equal, the program exits this 
segment. 



1200 POKE 77,0:fll1=MM+l;IF MH.H 
OTO 1110 



THEN B 
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1210 IF 3TICK(0)=15 THEN 60SUB 300:B0T 
1210 

These lines register the movement 
of the joystick and set the variable 
W to the appropriate number to 
position the giant cursor. 



1220 
= 1 

1230 
1240 



li)=STICK(0}:IF STICK (0) = 14 THEN W 



IF STICK(0)=(ii THEN W=2 
IF STICK(0)=7 THEN W=3 
1250 IF STICK (0) =5 THEN W=4 
1260 IF STICK (0) =13 THEN M=5 
1270 IF STICK !0)=9 THEN W=6 
1230 IF STICK (0) =11 THEN W=7 
1290 IF STICK (0) =10 THEN W=8 

After wiping out the checl<erboard 
cursor at the center of the screen in 
line 13000, it is printed In the 
following line at the new location 
indicated by the player. The 
following two lines read the joystlcl< 
to see If the button has been 
pressed to register a choice. Line 
1340 then erases the cursor from 
the new location and reprints the 
erased character by accessing the 
subroutine at line 110. 



1300 POSITION 9,6:? #6 



";:POS!TIC 



9,5:? «6;" "; 

1310 POSITION J(W),K!ii!):? l6;"YV"i;P0S 

ITION J(«),K(W)H:'' »6;"YY"; 

1320 IF STRI6{0)=0 T.HEN 1400 

1330 IF STICK (0)=WW THEN 1320 

1340 POSITION J(W).K(W.l:? 16;" ";:POS 



ITION J(H),K(W)+1 
:G0TO 1210 



#6: 



:BOSUE 110 



This series of lines constitute the 
evaluation section of the program. 
Line 1400 branches to 1500 if the 
guess is correct. Line 1410 registers 
an audible indicator of the incorrect 
guess and decreases the number of 
"lives" left to the player. The 
reprinting of the rectangle is 
repeated as outlined earlier. 
The player's successful guess is 
acl<nowledged in 1500 by replaying 
the correct note and incrementing 
his score. 



1400 IF M=N\f1(1) THEN 1500 



1410 SOUND 0,255, 10, 4:F0R UZ=1 TO 100: 

NEXT UhSOOND 0,0,0,0:LF(P)=LF(P)-1 

1420 POSITION J(W),K(M):? «6;" ";;POS 

ITION J(W!,K(W)+1:? #6;" "iiOOSUB 110 

:GOTO 1000 

1500 SOUND 0,N(W),10,8:FOR 2=1 TO B0:N 

EH Z:SC(P)=SC(P) + 10tLV(P):G0SUB 2000 

1510 POSITION J(W),K(M):? 16;" ";:PDS 

ITION J(W),KiW)+l:? #6;" ";:EOSUB 110 

: SOUND 0,0,0,0 

1520 FOR Z=l TO 25:NE)(T I:GOTO 1200 

Print the current player's score. 

2000 POSITION S1,S2:? #6;" ";:POS 

ITION S1,S2:? #6;SC(P) ;:RETIJRN 

The player's successful passage 
through the current level of 
difficulty results in an upgrading of 
both the number of notes to be 
played and the level of difficulty in 
lines 3000-3010. 

3000 FOR U2=16 TO STEP -2: FOR UY=0 T 

5:S0UND Oil5-UY,10,'J2:NEn UY:NE.KT U 

Z:N0(P)=N0(P!+1 

3010 IF NDlP.!.>10 THEN NQ(P; = 1:LV(P)=LV 

(P)+1:IF LV(P)>9 THEN 10000 

3020 GOTO 1000 

The "end game" portion of Tunein. 
If the console button has not been 
pressed and the joystick button has 
not been struck, ^he program will 
loop here indefinitely. 

9000 S03UB 10000: IF PEEK{53279)=7 AND 
STRIG(0)<:>0 THEN 9000 
9010 6I3T0 20fr 

The initial routine used at the 
beginning of each game to play 
each of the eight notes of the 
octave while cycling the 
checkerboard cursor through each 
of the eight rectangle positions. 

10000 Z=Z+1:IF Z>8 THEN Z=l 
10010 SOUND 0,l1iZ),10,8:POSITION 8,5:? 
it6;"TUNE";:P0SITIDN 9,6:? «6;"IN";:PD 



10020 POSITION J(Z),K(Z):? «6;"YY";:P0 



SITION J!Z),K(Z)+1:? »6;"YY'; 



10030 FOR Y=l TO 25:NEn Y:POSITION J( 
Z),K(Z):? #6;" ";:POSITION J(Z),K(Z)+ 
1:? #6;" '';:60SUB 110 
10040 SOUND 0,0, 0,0: FOR Y=l TO 10:NEn 
Y: RETURN 

The IVIachine Language routines to 
move the character set into RAM 
and clear out the player/missile area 
of memory is Initialized. As it is only 
accessed once, it has been placed 
at the end of the program. 

20000 FOR Z=l TO 32:READ ZZ:POKE ADRiX 

$) + !Z-l),ZZ:NE)(T 2:F0R Z=l TO 24:RE.flD 

2Z:P0KE ADR(Y$) + (2-l),2Z;NEn 2 

20010 DATA 104,104,133,213,104,133,212 

,104,133,215,104,133,214,162,4,160,0,1 

77,212,145,214,200 

20020 DATA 208,249,230,213,230,215,202 

,208,240,96 

20030 DATA 104,104,133,213,104,133,212 

,162,8,169,0,160,0,145,212,200,208,251 

,230,213,202,208,244,96 

20040 RETURN 



ATARI® SWAT TABLE FOR: 


TUNEIN 


SWAT 




LINES 


CODE 


LENGTH 


3 - 12 


AV 


622 


13 -60 


LU 


587 


70 - 130 


B6 


508 


140 - 300 


YH 


518 


310 - 430 


NR 


523 


440 - 1055 


KB 


505 


1060 - 1140 


JQ 


557 


1150 - 1270 


KN 


518 


12B0 - 1420 


QC 


585 


1500 - 9000 


DQ 


559 


9010 - 20000 


VB 


517 


20010 - 20040 


JN 


233 
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K-Byter 

Pictures at an XlO-bition 



An ATARI® K-Byter 
Suwala, Flanders, NJ. 



by David 



The classic framework for these 
pictures is made by plotting squares 
whose sides are the sum of the next 
two, smaller squares. This frame, 
called the golden rectangle, is the 
basis for many works of art. 

The special fill application com- 
mand (line 150) is ideal for coloring 
the square areas in the picture. The 
SETCOLOR statements select a 
palette of colors which are random- 
ly painted (line 140) on the screen. If 
the distortion of the squares offends 
your sense of artistic proportions, 
you can correct for the overscan on 
your TV by multiplying the Y coor- 
dinates in line 130 by 0.9 or so. 

After viewing your first 
Mondrian-Hke masterpiece, press 
START for an entirely different col- 
or combination. 

10 REN PICTURES AT AN XIO-BITION 

20 REM BY DAVID SUKALA 

30 GRAPHICS 7+16 

40 1(0=50! Y0=65: A=l : B=l : F=l ! RATCHET=0 

50 COLOR 1 

60 SETCOLOR 0, 3, 5i SETCOLOR 1,7,9!SETC0 

LOR 2,15,13 



70 RATCHET=RATCHET+l!ON RATCHET GOTO 8 

0,90,100,110 

80 K0=l(0+A!YO=YO-B!60TO 120 

90 l(0=)(0+F!YO=YO+AiGOTO 120 

100 YO=Y0+F!6OTO 120 

no tMO-i 

120 IF RATCHETM THEN RATCHET=0 

130 PLOT XO.YOiDRAWTO )(0,YO-F!DRAMTD I 

0-F,YO-F!POSITION )(0-F,YO:POKE 53279,0 

140 POKE 765,INT((3»RND(0))+1) 

150 no 18,«6,0,0,"S!" 

160 A=B!B=F;F=A+B 

170 IF F=144 THEN 190 

180 GOTO 70 

190 START=53279:IF PEEK (START) =7 THEN 

190 

200 SOTO 30 © 
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Gncompromised design delivers superior 
quality and reliability. Todays latest technology 
allows your Atari 400 to run up to 50% cooler 
and provide truer video clarity. We guarantee it. 

So let's get down to business. 

48K RAM for the 
ATARI 400 
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Computer Products j 
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come. N.Y. residents 
please include sales 
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Menuplus is a disk utility program 
for an ATARI® 400/800 requiring 16K 
RAM and a disk drive running under 
DOS I or II. It is included as tlie bonus 
program on this month's ATARI® 
Disk Version. 



wmmm 



by Paul Marentette 

Those ATARI® owners who eagerly 
awaited the release of DOS II were 
rewarded for their patience. DOS II, 
unlike DOS I, supports the NOTE and 
POINT commands for random access 
of disk files. In addition, the newer 
DOS uses less memory, as only half of 
DOS resides in RAM at all times. The 
latter feature makes more RAM 
available for BASIC programs, but, at 
the price of losing immediate access to 
the DOS menu. When you call up the 
DOS menu there is an annoying delay 
while the DOS utilities package 
(DUP.SYS) is loaded from the disk. 

MENUPLUS was designed to 
minimize the need for the DOS menu. 
It gives you most of the DOS utilities 
from BASIC and makes their execu- 
tion much easier. Wouldn't it be a 
pleasure to have your disks 
automatically boot a program which 
would: 1) load faster than the DOS 
menu; 2) identify the title and volume 
number of the disk; 3) neatly format 
the disk's directory on the screen; 4) 
number all file names in the directory; 
and 5) permit you to LOAD, RUN, 
LOCK, UNLOCK, DELETE, 
RENAME and ENTER files simply by 
giving a one-letter command? 



MENUPLUS has all of these 
capabilities and, if you have a printer, 
will even make a printed hsting of the 
disk's directory. 

Most of this is accomplished by us- 
ing ATARI® BASIC'S XIO command. 
XIO is a generalized input/output 
command that, among other things, 
allows DOS type commands to be ex- 
ecuted from a BASIC program. Com- 
mands are specified by using a numeric 
code for the desired action. For exam- 
ple, to delete a file you would use the 
number 33, coding it as follows: 

XIO 33,#l,0,0,"D:filename" 

The "#1" is a channel, or lOCB 
number hke those used in OPEN, 
CLOSE, PRINT, INPUT, GET and 
PUT commands. The two zeros hold 
places for unused parameters. Page 30 
of the ATARI® Basic Reference 
Manual contains a complete listing of 
the XIO command numbers. 

MENUPLUS takes all the drudgery 
out of using XIO commands and 
eliminates the need to type in complete 
file names when using them. Further- 
more, the disk's directory is always 
present on the screen while you are 
choosing a command and file number. 
Part of the directory does not get over- 
written with MENUPLUS, as it does 
when using the DOS II menu. Also, 
unlike DOS II, the directory is 
automatically re-displayed after each 
command is executed. 

A Closer Look 

When first run, MENUPLUS waits 
for you to place a disk in the drive (in 
case you want to change disks before 
proceeding). The pressing of any key 
(RETURN is suggested on the screen) 
prompts the program to continue. You 
can omit this step by putting a REM at 
the beginning of line 60, in which case 



the program will immediately read the 
directory of the disk in the drive when 
the program is run. 

A heading is printed near the top of 
the screen, followed by the disk's direc- 
tory in a neatly formatted, two-across 
fashion. You can customize the 
heading by altering the second string in 
line 40. I have MENUPLUS stored on 
each of my disks and have put a disk 
title and volume number in this loca- 
tion. 

The directory is accessed by opening 
an lOCB in the #6 read directory mode 
(line 70) and the file names are stored 
in the simulated string array FN$. A 
number is assigned to each file name 
and is printed to the left of the name. 
The sector count for each file is printed 
on the right. 

File numbers are used to refer to files 
throughout the program (great for 
slow or inaccurate typists!). The 
PEEK(84) in line 110 checks to see if 
the cursor has reached the 19th line, 
and if it has, the program asks for per- 
mission to continue the directory on a 
new screen page. 

Once the directory has been listed, 
the menu of available utilities is 
displayed. By saving the position of the 
menu's first line in the ROW variable 
(line 160), when necessary, the pro- 
gram can clear the screen from ROW 
down — the directory is never removed 
from the upper portion of the screen. 

Commands are entered using one- 
letter codes. Invalid commands are 
trapped (line 410) and then the menu is 
re-displayed. After a valid command is 
entered, you will be prompted for a file 
number (unless you choose the "P" — 
Printout command). The program 
searches for the corresponding file 
name and then carries out the re- 
quested action. 

If you are deleting a file, you will be 
asked to approve the action before it 
takes place (line 300). If you are 
renaming a file you will be prompted to 
provide a new file name (Hne 340). If a 
file to be deleted or renamed is locked, 
you are asked if you want to 
delete/rename it anyway (line 370). If 



your response is "Y", then the com- 
mand will be processed and the re- 
named file will be re-locked. If any 
problems occur in processing the com- 
mand, a buzzer sounds, an error 
message is printed, and the menu of 
commands is re-displayed Oine 420). 

The PRINTOUT and ENTER com- 
mands take advantage of "ATARI® 
trickery." When the printer is to be 
used, the DV (device) variable is set to 
1 and lOCB #1 is OPENED for output 
to the printer. Then, when the direc- 
tory print routine is used (lines 70-140), 
all the "? #DV" commands send out- 
put to the printer. Otherwise DV is 
and lOCB #0 is always open for output 
to the screen editor. ENTER is used to 
load a file that has been saved to the 
disk using LIST. ENTERing a file does 
not clear out any program currently in 
memory. Hence, MENUPLUS first 
prints the ENTER "Drfilename" com- 
mand on the screen, then clears the 
memory with NEW and leaves the cur- 
sor on the line where the ENTER com- 
mand is printed. All you do is press 
RETURN to begin the loading process 
(line 450)! 

MakXng MENUPLUS 
Autoboot 

Here's what I consider to be the best 
feature of this utility package. If you 
run the BOOTMENU program, it will 
create an AUTORUN.SYS file 
(AUTO. SYS for DOS I) on your disk. 
This special file will automatically run 
MENUPLUS when you boot the disk. 
But remember to SAVE the MENU- 
PLUS program with the filename of 
"D:MENUPLUS" because the 
AUTORUN file is looking for that ex- 
act program name syntax. The 
BOOTMENU program prompts you to 
specify 1 or 2 based on whether you are 
using DOS I or II. Make sure that you 
have booted DOS I into the system 
before running BOOTMENU if you 
are writing an AUTO. SYS on a DOS I 
disk. This is necessary, as the binary 
load file that is created has a different 
header (the first 2 bytes) for each ver- 
sion of DOS. 

MENUPLUS is a most versatile 
utility program. Combined with the 
new features of DOS II, it makes the 
ATARI® a more powerful and friendly 
computer. © 
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Simulated Computer 



A review by Craig Chamberlain 



by James F. Wieder (Edu-Soft, 
Steketee Educational Software, 
4639 Spruce St., Philadelphia, PA 
19139) System Requirements: 
ATARI® 400/800, ATARI® BASIC 
Cartridge, 16K RAM (Cassette) or 
24K RAM (Disk). Suggested retail 
price: $14.95 Cassette, $19.95 Disk. 

One application of computers in 
education is the simulation of a par- 
ticular event or process. For exam- 
ple, a computer can replay the 
decisive battles of a war to show tac- 
tics, or demonstrate the proper pro- 
cedure to follow when attempting to 
operate a nuclear power plant. 
Three Mile Island and Scram are 
good examples. The ATARI® 
400/800 computers, with their 
superior graphics capabilities, have 
the potential of presenting some 
very effective simulations. Now, a 
company has produced a program 
that makes your ATARI® computer 
simulate, of all things, a computer! 
Let's take a look at Simulated Com- 
puter from Edu-Soft. 

The Purpose of a Simulation 

The value of a simulator is that it 
provides a learning experience in a 
controlled environment. A driving 
simulator can help teach a person 
how to drive a car without the risk 
of an actual crash. Simulated Com- 
puter applies that idea of safety and 
convenience to the process of learn- 
ing about the inner workings of a 
computer. Simulated Computer is a 
learning aid that presents some 
essential concepts of how a typical 
computer operates at the "Machine 
Language" level. The confusion of 
using an assembler and the hassle of 
"crashing the system" when 
mistakes are made has been 
eliminated. This program is for the 
student who wants to learn how to 
program a computer at the 
microprocessor level, commonly 
referred to as "Machine 
Language." Simulated Computer 
will get the student off to a good 
start. 
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A Simplified Computer 

A typical microcomputer consists 
of a microprocessor and memory. 
The microprocessor, the heart of the 
computer, generally has many 
registers and several dozen possible 
operations. There could be several 
thousand memory locations. People 
who want to program in Machine 
Language often use an assembler 
and must have an understanding of 
binary numbers. Simulated Com- 
puter greatly simplifies this by using 
only one register (called an ac- 
cumulator), ten operations, twenty 
memory locations, and decimal 
numbers. No assembler is necessary. 
Error checking is automatic, with 
explanations of errors. The ten 
operations include the four primary 
arithmetic operations (addition, 
subtraction, multiplication and divi- 
sion), loading and storing the ac- 
cumulator, performing input and 
output, jumping to a new instruc- 
tion, and skipping, on condition, 
past one instruction. Even with this 
limited vocabulary, it is possible to 
do a lot of computing. 

Simulated Computer in Action 

The main program display con- 
sists of a window for entering com- 
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mands and programs, a program 
counter, instruction register, ac- 
cumulator, twenty memory loca- 
tions, and a comment field. The 
first thing the student must do is 
enter a program into memory. 
Several example programs are pro- 
vided. Once the program is loaded, 
execution is started with the RUN 
command. Simulated Computer 
then shows, step-by-step, the pro- 
gram counter being incremented, an 
instruction being fetched from 
memory, and the instruction being 
executed. At each step, the com- 
ment field contains a description of 
the current activity of the computer. 
Each register or memory location is 
highlighted when it is in use. Execu- 
tion speed can be changed by com- 
mand or by using the joystick. Bet- 
ter yet, it is possible to single step 
through a program by pressing a key 
to execute each step. The program 
can be stopped at any point and 
then continued. Any time the stu- 
dent has a question, typing 
"HELP" will display a number of 
screens that hst all the operations 
and error codes. The student has 
full control over the program execu- 
tion and is kept informed of the 
computer's activities at all times. 
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The Tutorial 

Simulated Computer comes with 
a user's guide that is actually a 
tutorial. The manual I examined 
presented five lessons with pro- 
grams, and appendices briefly ex- 
plaining the terms, user commands, 
computer instructions and error 
messages. Although it was nicely 
produced and free of errors, it 
assumed the student was familiar 
with program counters, memory 
locations, etc.. To avoid those 
assumptions on future users, the 
manual is being rewritten with the 
help of a professional technical 
writer. When that is done, I expect a 
concise, complete manual that can 
be used by anyone who's had 
limited computer experience. 

Field Tested, So To Speak 

Simulated Computer has been 
available on Apple™ and TRS- 
80® computers for two years, so it 
certainly has been "field tested." I 
criticize only a couple of things 
about the ATARI® implementation. 
When it boots up, the program 
displays a "dead screen" a little too 
long for comfort while it is initializ- 
ing. Also, switching between the 
simulation and HELP text messages 
could be made faster by using two 
screens in memory simultaneously. 
But, these are only minor points. 

Summary 

Simulated Computer from Edu- 
Soft has definite educational value. 
It does what it's supposed to do. Its 
best application, currently, is in the 
classroom where there is a teacher 
present to provide guidance. 
Hopefully, the revised tutorial will 
be more suitable to people outside 
of such a setting. I want to point out 
that this program does not teach 
6502 assembly language program- 
ming, used with ATARI® com- 
puters. Rather, it presents concepts 
common to all computers. The pro- 
gram has been submitted to the 
ATARI® Program Exchange 
(APX). While this program will 
not "stun" those who use com- 
puters in education, it is a solid ad- 
dition to the growing collection of 
educational software for 
ATARI® computers. O 




The aliens have swept undefeated across the galaxy. 
You are an enterprising star ship captain — the final 
defender of space. 

As the aliens attack, you launch a deadly barrage of 
missiles. Flankers swoop down on your position. 
Maneuvering to avoid the counterattack, you 
disintegrate their ships with your magnetic repellers. 

As your skill improves, the attackers increase their 
speed. And as a last resort, the aliens use their 
invisible ray to slow the speed of your missile 
launcher. 

GALACTIC CHASE provides Atari owners with the 
most challenging one or two person game in the 
galaxy. 
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ATARI 

Atari 400/800 16k. Written in machine language. Requires joysticks. 

Payment: Personal Checks — allow three weeks to clear. 

American Express, Visa, & Master Charge — include all numbers on card. Please include phone 
number with all orders. 24.95 for cassette or 29.95 for disk plus 2.00 shipping. Michigan 
residents add 4%. 

Check the dealer in your local galaxy. Dealer inquiries encouraged. 
Galactic Chase © 1981 Stedek Software. 
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Dept S. 
26618 Southfield 
Lathrup Village, Ml. 48076 
(313) 559-5252 
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ATARI- Microsoft BASIC 



A review by Sheldon Leemon 



One of the features of the 
ATARI® Home Computer System 
on which reviewers often comment 
is that its BASIC language was not 
written by Microsoft. This is signifi- 
cant because Microsoft has written 
the BASIC interpreter for the Ap- 
ple™, the PET™, the TRS-80®, and 
so many other popular microcom- 
puters that their version has become 
the de facto standard of the in- 
dustry. This lack of a standard 
BASIC may have given some poten- 
tial purchasers pause when consider- 
ing the ATARI®. Now, however, 
ATARI® has changed this state of 
affairs by adding Microsoft BASIC 
to the growing Hst of languages 
available for use with their Home 
Computer System. 

Just what this will mean to 
ATARI® owners remains to be seen. 
One result will be a somewhat 
greater software compatability be- 
tween the ATARI® and other 
popular personal computers. The 
instruction manual that comes with 
ATARI® Microsoft BASIC (I'll 
refer to it hereafter as AME) even 
has appendices with instruction for 
converting programs from the 
PET™, Apple™, and TRS-80® to 
the ATARI® version. But despite 
the impression of compatibility that 
such instructions convey, the fact 
remains that the ATARI® differs 
significantly from other microcom- 
puters in its hardware features, most 
notably in its graphics and sound 
capabilities. Programs which were 
written for other computers will not 
be able to take advantage of the in- 
creased user-friendliness that a 
generous helping of ATARI® sound 
and graphics can lend to a program, 
without substantially reworking the 
code. While the implementation of 
Microsoft BASIC on the 
ATARI® will probably make 
available many useful and instruc- 
tive programs, a thorough 
knowledge of the workings of the 
ATARI® computer will still be 
necessary to adapt these programs 
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"ATARI® is already 
working on the next revision, 
wfiich will be packaged in 
one, 16K ROM cartridge, 
with a boot-up file of add- 
ons for disk users. This will 
allow owners of minimum 
configuration systems to 
use AMB with a minimum 
of fuss." 



to take full advantage of the 
ATARI®'s unique qualities. 

Of course, the potential buyer will 
want to know not only what new 
commercial software AMB will 
make available for the computer, 
but also what advantages this 
BASIC dialect offers to the pro- 
grammer who wants to write custom 
applications. This review will try to 
highlight some of the more impor- 
tant features of AMB in order to 
help you decide whether it suits your 
own personal needs. 

The initial requirement is that you 
have a disk drive and at least 40K 
RAM. If not, AMB is definitely not 
for you — yet. The only version cur- 
rently available is disk-based, and 
takes up about 19.5K of memory. 
With DOS booted up, that leaves 



only about 21K free in a 48K system 
(less if the RS-232 handler in the 850 
interface is also booted up). Also, 
the disk is copy-protected, so you 
will always have to boot up your 
master copy and will not be able to 
make back-up copies. You will also 
probably not be able to use this ver- 
sion with any of the new disk drives 
that require a patched version of 
DOS, including the Axlon RAM- 
DISK board. Another side-effect is 
that in order to go to DOS, a 
MEM.SAV file must always be writ- 
ten, further slowing down the pro- 
cess of changing environments. If 
you find these limitations discourag- 
ing, don't give up just yet. 
ATARI® is already working on the 
next revision, which will be pack- 
aged in one, 16K ROM cartridge, 
with a boot-up file of add-ons for 
disk users. This will allow owners of 
minimum configuration systems to 
use AMB with a minimum of fuss. 

Before discussing the specific 
commands offered by AMB, a few 
words about Microsoft BASICs, in 
general, are in order. A number of 
features in Microsoft BASIC are im- 
plemented quite differently than in 
ATARI® BASIC. Those who have 
some experience with Microsoft 
BASIC on other machines will be 
quite comfortable with this version. 
Because it is based on the full, ex- 
tended Microsoft BASIC model, it 
most closely resembles TRS- 
80® Level II, with a few more 
features. Those who have pro- 
grammed primarily with ATARI® 
8K BASIC are likely to notice a 
number of Microsoft's character- 
istic quirks as soon as they start to 
enter a program from the keyboard. 
In Microsoft BASIC, no abbrevia- 
tions are allowed, except the "?" 
for PRINT. No syntax checking is 
performed at the time of line entry, 
so errors in entry will not be ap- 
parent until the program is running. 
Also, Microsoft BASIC is much 
more particular about spacing than 
the 8K version, and failing to 
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separate statements from numbers 
will result in a syntax error. When 
you do get the error message, 
however, you will be pleased to find 
that it is in plain English. Many 
statements can only be executed in 
the deferred mode, not from the 
keyboard. 

Microsoft BASIC lets you choose 
the precision of numeric variables. 
Integer variables (indicated by the 
% as the last character in the name) 
can be chosen for speed, or double 
precision (indicated by a # at the 
end) can be used to allow greater ac- 
curacy in mathematical calula- 
tions. For convenience, the DEF — 
commands (e.g. DEFINT and 
DEFDBL) allow you to designate all 
variables starting with one letter as 
having the same precision. Math 
functions are implemented by the 
interpreter, not by the slow, 
floating-point package in the OS 
ROM, which makes faster calcula- 
tions possible. Also, logical 
operators such as AND and OR do 
true bitwise comparisons, as op- 
posed to the ATARI® BASIC 
operators, which compare the truth 
of the whole expressions. Logical 
true equals -1, not 1. 

The system commands that 
Microsoft BASIC offers for 
"housekeeping" are very conve- 
nient. AUTO allows automatic line 
numbering for program entry and 
will warn if a new line number 
duplicates an existing line number. 
DEL allows you to delete whole 
blocks of numbered statements. 
LIST allows open-ended listing such 
as "500-" to list statements with a 
higher line number than 500. LOAD 
will load programs saved in either 
SAVE or LIST format. RENUM of- 
fers complete renumbering of pro- 
grams, including references in such 
statements as GOTO, GOSUB, etc.. 
Commands such as LOCK, 
UNLOCK, NAME and KILL allow 
you to perform the DOS functions 
that require an XIO command in 
ATARI® BASIC. Additionally, 
TRON and TROFF allow the track- 
ing of program execution by print- 
ing, on the screen, the Hne number 
of the statement currently being 
executed. 

There are a number of significant 
additions to the general program 
statements offered by AMB. For ex- 



ample, the MOVE statement allows 
you to copy any number of bytes 
from one location in memory to 
another. This is helpful in animating 
Player-Missile graphics, and in 
moving the ROM character set into 
RAM, so that user-created fonts 
may be employed. The IF... THEN 
sequence now allows an ELSE 
clause which will execute when the 
IF clause is not true. OPTION 
BASE allows you to choose whether 
array subscripts will start with a or 
a 1. The WAIT command allows 
you to pause the program until a 
location in memory takes on a 
specific value. This is ideal for 
halting execution until VBLANK 
occurs, so that graphics changes can 



"A rather remarkable addi- 
tion in AMB is the COIVIMON 
statement. This allows you 
to designate certain 
variables to keep their 
values from one program run 
to the next. This greatly 
facilitates chaining several 
related programs together to 
operate from one menu pro- 
gram, and will be most 
helpful in overcoming the 
RAM limitations imposed by 
the size of the interpreter." 



be made without disrupting the 
display. It could also be used in con- 
junction with the real-time clock for 
a measured pause. There is another 
time-related statement which is even 
more fascinating. This is the 
AFTER command, which allows 
you to change the flow of program 
control after a given period of time. 
For example, the statement AFTER 
(600) GOTO 200 would have no im- 
mediate effect on the program. But 
in 10 seconds (600 "jiffies," or 
60ths of a second), the program 
would stop doing whatever it had 
been doing and start executing at 
line 200! This gives you, in effect, a 
time-driven interrupt. 

A rather remarkable addition in 
AMB is the COMMON statement. 



This allows you to designate certain 
variables to keep their values from 
one program run to the next. This 
greatly facilitates chaining several 
related programs together to 
operate from one menu program, 
and will be most helpful in overcom- 
ing the RAM limitations imposed by 
the size of the interpreter. Other 
new program statements include ON 
ERROR, a slightly different error 
trapping scheme than TRAP, which 
allows you to RESUME the pro- 
gram after an error at the line where 
the error occurred, the next line, or 
at any designated line number. ERL 
will return the line number where an 
error occurred, while ERR will let 
you generate any error, for purposes 
of debugging your program's error- 
trapping code. OPTION PLM, OP- 
TION CHR, and OPTION RE- 
SERVE statements let you set aside 
reserved areas of memory for 
player-missile graphics, character 
sets, or machine code. 

I/O operations have been 
substantially overhauled in this 
BASIC, particularly as they relate to 
ATARI® 's unique system for handl- 
ing I/O in a device-independent 
manner through the use of a Central 
I/O Utility. For example, the OPEN 
command used to assign an I/O 
channel to a device now has a syntax 
closer to EngUsh (e.g. OPEN #1, 
"K:" INPUT). However, there is a 
price to pay for this simplification. 
Because the command syntax no 
longer corresponds directly to the 
requirements of the Central I/O 
Utility, you can only OPEN a device 
for the READ, WRITE, UPDATE 
and APPEND functions, and not to 
read the Directory. You cannot 
OPEN the cassette for reading or 
writing files with short inter-record 
gaps. This would not be so bad if 
the XIO command had been re- 
tained. But, because most of its 
functions have been implemented 
through other commands, it has 
been deleted. The only concession 
made to the BASIC user wishing to 
perform missing CIO functions such 
as formatting a disk, reading the 
disk directory, or reading or writing 
a block of memory to or from a disk 
file, is the inclusion of a disk file 
called CIOUSR. This file provides 
three prewritten USR routines 
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ATARr 

OWNERS & 
PROSPECTIVE 
OWNERS 

Now is the time to buy 

ATARI® products at low, 

low prices! 

ATARI® 800 w/ 16K $699 

w/ 32K $784 

w/ 48K $869 

ATARI® 400 w/ 16K $350 

ATARI® 850 Interface $175 

ATARI® 830 Modem $159 

ATARI 810 Disk Drive $460 

ATARI 410 Recorder $79 



Cartridges %35 each, any three for S99.95 

Asteroids • Centipede • Missile Command • Pac- 
Man • Space Invaders • Super Breakout • Computer 
Chess 

PILOT (COMPLETE) $99 

PILOT HOME PKC $63 

STAR RAIDERS CART $38 

CAVERNS OF MARS $31 

MUSIC COMPOSER CART $45 

ENTERTAINER PKC $83 

PROGRAMMER PKC $56 

COMMUNICATOR PKC $320 

PKC A -ATARI'' 800 w/48K, 850 Interface, 810 Disk 
Drive, Epson MX-SO Printer w/ CRAFTRAX & Cable, , S1990. 
PKC B - ATARI* 800, w/ieK, 410 Program Recorder. Anv 

3, $35 Cartridges!, Pair of loysticks $877. 

PKC C — ATARI® 400 w/IBK, 410 Program Recorder, Pro- 
grammer Pkg $475 

PKC D - ATARI" 400 W/16K, Entertainer Pkg, Any 2, $35 
Cartridges $494 

Add 1% for shipping & handling 
Michigan residents add 4% sales tax. 
ATARI® & are trademarks of ATARI®,lnc 

WE ALSO BUY AND SELL USED ATARI® 
EQUIPMENT. WRITE TO US. 

TM 



Computer's Voice 

software for the ATARI® 
400/800 computers 

Word Search Puzzle Maker — Makes word 
search puzzles and answers on a printer-- 
24K cassette, 24K disk $24.95. 
MENUMAKR — takes in and dumps text 
screens in GRAPHICS 0-8K cassette, 16K 
disk $24.95. 

MATHFAKS — Math drill program using 
color and sound. Optional accessories in- 
clude a printer and VOTRAX Type-N-Talk- 
24K cassette, 24K disk $24.95. 
Electronic Grade Book — Great classroom 
aid for teachers. Uses number or letter 
grades, weighted scores, screen or printer 
output, and more. 32K cassette, 40K disk 
64.95 

Light Pen - for the ATARI® 400/800 by 
Symtec. Suggested list price $149.95. Men- 
tion this ad and pay $134.95. 
AXAION-128K RAMDISK for 
ATARI® 800s only $420. 
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Add $2 p/order for shipping 
Michigan residents add 4% sales tax 

Computer's Voice 

2370 Ella Dr. 
Flint, Ml 48504 
(313)238-5585 
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which will allow you to condition 
the I/O Control Blocks and then 
call the Central I/O Utility. 
However, the user who is sophis- 
ticated enough to take advantage of 
the CIOUSR file is probably 
sophisticated enough to POKE the 
right values directly into the lOCB, 
and control all CIO with his or her 
own USR statement. The upshot is 
that some I/O flexibility has been 
sacrificed for the sake of easy use. 

In other areas, I/O flexibility has 
been greatly enhanced. The INPUT 
command will let you substitute 
your own prompt message for the 
default question mark, and LINE 
INPUT will let you input a complete 
line, ignoring commas, quotation 
marks, and other terminators. 
There are a number of handy 
statements to aid in the production 
of neatly formatted output. SPC 
will print a designated number of 
spaces. TAB will let you tab to a 
given print column. PRINT USING 
is fully implemented, letting you 
right justify, insert decimal places, 
trailing spaces, leading spaces, com- 
mas, dollar signs, asterisks, and 
generally line everything up in nice, 
neat, uniform columns. For screen 
output, the POSITION command 
has been replaced with PRINT 
AT(X,Y), where the variables X and 
Y indicate the screen row and col- 
umn. Interestingly enough, this 
command also replaces the state- 
ment, POINT, when used with a 
disk file as the device — in that case, 
the variables X and Y indicate which 
sector and byte should be written. 

The function library in AMB is 
mostly the same as ATARI® 
BASIC, although the math routines 
will generally have greater accuracy 
and better speed. Trig functions are 
only available in radians in AMB. 
TAN is implemented. RND is a Uttle 
more flexible, allowing you to 
generate random integers and 
repeatable pseudorandom sequences 
as well. TIME is added as a function 
which returns elapsed time to 1/60 
of a second. The USR command is 
somewhat different in AMB. Rather 
than passing arguments to the 
machine language routine on the 
stack, AMB passes only one integer 
argument directly to two zero-page 
locations. While a programmer can 
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use RAM from $CD to $FF in a 
USR call, there are no "safe" user 
zero-page locations, where variables 
can be stored immune to raeddhng 
from BASIC. As a matter of fact, 
not even page 6 is sacred — BASIC 
uses half of it, leaving little pro- 
tected space for non-relocatable 
code. 

One of AMB's great advantages 
over A TARI® BASIC is its ability to 
accept user-defined functions. This 
lets the user, in effect, make up his 
or her own BASIC commands. For 
example, as mentioned below, there 
is no AMB statement comparable to 
STICK(X), which returns the value 
of the joystick. However, the user 
could define such a function with 
the line DEF STICK(X) = PEEK 
(632 -hX). Then, every time 
thereafter in a program STICK(X) 
was used, the function would return 
the value of joystick number X. 
Moreover, the user could even 
define HSTICK(X) and VSTICK(X) 
as in BASIC A -I- , where the func- 
tions would return a 1, 0, or -1 
depending on whether the joystick is 
being pushed up or down, right or 
left. One of the more serious over- 
sights in the manual is the lack of at- 
tention to this command. The func- 
tions it allows you to define not only 
save time over a subroutine call, but 
can make possible the use of pro- 
gram constructs which otherwise 
could not be used. The DEF state- 
ment also allows you to define string 
functions, which will perform any 
allowable combination of string 
manipulations. 

Perhaps the most significant dif- 
ference between AMB and 
ATARI® BASIC is in the area of 
string handling. In ATARI® 
BASIC, strings are one- 
dimensional. They must be DIMen- 
sioned, and can be as long as 
memory allows. In AMB, one- 
dimensional strings don't have to be 
DIMensioned, and true string arrays 
are implemented. The latter feature 
is greatly prized by Microsoft 
BASIC enthusiasts, who find that 
string arrays much simplify the task 
of character data manipulation. 
Maximum string length is limited to 
255 characters, however. 

If the amount of free memory 

gets low, AMB performs what is 

continued on page 72 
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Name 


Microsoft 


COMPARISON OF BASIC COMMANDS 
ATARI® BASIC A + Name 


Microsoft 


ATARI® 


BASIC A + 


® 


System Commands 

AUTO 

BYE 

CLEAR 

CLEAR STACK 

CLOAD 


X 




X 

X 
CLR 

X 
X 
X 


OPTION CHR 

OPTION PLM 

OPTION RESERVE 

PADDLE.PTRIG 

PEEK 

PLOT 

PLOT (X,Y) TO (X,Y) 

PMMOVE.PMWIDTH 

POKE 


X 
X 
X 

X 




PMGRAPHICS 


X 
X 
X 


X 
CLR 

X 
X 
X 


X 
X 


X 
X 


CONT 
CSAVE 


X 
X 


X 


DRAWTO 


DRAWTO 


DEL 
DIR 
DOS 


X 

X 


X 


X 
X 


X 




X 


X 


X 


X 


POP 




X 


X 


KILL 

LIST 

LOAD 

LOCK 

LOMEM 

LVAR 

MERGE 

NAME 

NEW 

RENUM 


X 




ERASE 

X 

X 

PROTECT 


PRINT 
PRINT AT 


X 


X 


X 


-nn.nn- 
X 
X 


X 
X 


X 


POSITION 


POSITION 


PRINT USING 
PUT 


X 

X 




X 


X 


X 


X 

X 
X 


ENTER 


X 

X 

ENTER 

RENAME 


ROET.RPUT 
READ 


X 




X 


X 


X 


REM 

RESTORE 

RESUME 


X 


X 


X 


X 


X 


X 


X 


X 


X 






X 




X 


SOUND 


X 


NOT TIMED 


NOT TIMED 


RUN 


X 


X 

X 


X 

X 

X 


SPC 

STACK 

STATUS 

STICK.STRIG 


X 
X 
X 






SAVE 


X 


X 


X 
X 


SAVE w/LOCK 
TROFF 
TRON 
UNLOCK 


X 
X 
X 
X 


X 


X 




X 


STOP 


X 


X 


X 




UNPROTECT 
X 


TAB 


X 




X 


VERIFY 

BASIC statements 

AFTER 
BPUT.BGET 
BUMP 
CLOSE 


X 


. .. 


WAIT 


X 




X 


XIO 




X 


"• WHILE.ENDWHILE 






X 


X 




String Functions 






X 


X 




X 


ASC 


X 


X 


X 


X 


CHR$ 


X 


X 


X 


CLS 

COLOR 

COMMON 

DATA 


X 






INKEYS 


X 






X 
X 


X 


X 


INSTR 
LHKIH 

LEN 


X 
X 




X 




X 






X 


X 


X 


X 


X 


DEF 






MID$ 


X 






DEFINT 
DEFDBL 


X 






RIGHTS 


X 




LOCATE 


X 




SCRNS 


X 


LOCATE 


DEFSNG 


X 






STRI 


X 


X 


X 


DEFSTR 

DPEEK.DPOKE 

DIM 


X 
X 




X 
X 


STRINGS 

TIMES 

VAL 


X 
X 
X 






X 


X 


END 


X 


X 


X 


VARPTR 

BASIC Functions 


X 


ADR 


ADR.PMADR 


EOF 
ERROR 


X 




XIO 18 
X 


X 




FILL 

FOR..T0.. STEP. ..NEXT 

GET 

GOSUB.. RETURN 

GOTO 


X 

X 
X 


XIO IS 
X 
X 


ABS 


X 


X 


X 


ATN 


X 


X 


X 


X 


CLOG 




X 


X 


X 


X 


X 
X 


COS 


X 


X 


X 


X 


X 


DEO 




X 


X 


GRAPHICS 
HSTICK,VSTICK 


X 


X 


X 


ERL 






ERR(I) 






X 


ERR 


X 




ERR(0) 


IF..THEN..ELSE 

INPUT 

LET 

LINE INPUT 

LPRINT 

MISSILE 

MOVE 

NOTE 

ON ERROR 

ON. .GOSUB 

ON. GOTO 

OPEN 

OPTION BASE 


X 
X 
X 
X 

X 

X 
X 


NO ELSE 


UNLIMITED ELSE 


EXP 


X 


X 


X 


X 
X 

X 

TRAP 
X 


X 

X 

X 
X 
X 

TRAP 
X 


FRE(X) 

INT 

LOG 


X 


X 


X 

X 






X 


X 


RAD 

RANDOMIZE 

RND(X) 

SON 

SIN 

SQR 


X 


X 


X 






X 
X 
X 
X 


0<X<1 
X 
X 


0<X<1 
X 
X 


X 


X 


X 
X 
X 


X 
X 


X 
X 

SET 


TAN 

TIME 

AND.OR.NOT.XOR 


X 
X 
X 


NOXOR 


NOXOR 
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known as string-gathering or gar- 
bage collection, by which it com- 
presses the strings down to the space 
actually occupied by data. The pro- 
grammer should be aware of this 
feature, as it may cause a noticeable 
pause in a program while it occurs. 
As an offshoot of this process, 
strings tend to move around in 
memory while a program is running, 
making them a less dependable 
place in which to hide machine-code 
subroutines, player-missile graph- 
ics, etc.. 

In addition to string arrays, many 
other handy string features are im- 
plemented. There is a true con- 
catenation operator (C$ = A$-l-B$). 
LEFTS, MID$, and RIGHTS help 
separate substrings, and INSTR per- 
forms a search for a substring 
within a larger string. STRINGS 
allows you to fill a string with any 
number of repetitions of a single 
character, or string of characters. 
Other functions now included 
within string operations are IN- 
KEYS, which records a keypress on 
the fly, TIMES which returns the 
time in Hours : Minutes : Seconds 
format, and SCRNS, which replaces 
LOCATE, returning the value of 
data under the graphics cursor. 

In the area of graphics, AMB is 
very similar to ATARI® BASIC. 
Major changes include the combina- 
tion of PLOT and DRAWTO into a 
PLOT (X,Y) TO (X,Y) command 
that can be chained indefinitely 
within a single statement — a much 
streamlined procedure over the 
ATARI® BASIC version. A CLS 
command has been included to clear 
the screen. Also, SETCOLOR has 
been expanded to include the 
registers for player-missile graphics. 

Player-missile graphics are sup- 
ported to a moderate extent by 
AMB. The OPTION (PLM) com- 
mands set aside space for either 
single-resolution or double- 
resolution PM graphics, and put the 
location of the base address into 
the proper hardware register. This 
address can be found with the 
VARPTR command {AMB's 
answer to the ADR function), and 
can be used to calculate the offsets 
into player and missile storage 
areas. As stated above, the SET- 
COLOR command can be used to 
control player color. The MOVE 



command can be used to shift the 
offset position of a player, to 
achieve vertical movement. But 
player width, priority control, 
horizontal position, colHsion detec- 
tion, and other features still must be 
implemented through PEEKs and 
POKEs. Here is another area where 
the DEFined function could give the 
user a lot of aid. The manual 
thoroughly documents the features 
of PM graphics, and gives plenty of 
step-by-step examples for the begin- 
ner. This is a big improvement over 
the ATARI® BASIC manual, which 
does not acknowledge the existence 
of PM graphics. However, this 
manual still ignores the existence of 
the GTIA chips, and graphics 
modes 9, 10, and 1 1 which it makes 
available to users of machines made 
after 1981. 

Last, but not least, we come to 
game controllers and sound. As 
mentioned above, there are no com- 
mands for joystick, paddle, or light- 
pen reading, although they can easi- 
ly be implemented with DEFined 
functions or PEEKs. There has 
been, however, a pleasant addition 
to the SOUND statement — a fifth 
parameter that designates the dura- 
tion of the note in 60ths of a second. 
This means that you no longer have 
to write imprecise delay loops to 
sustain sound effects. 

The manual supplied with AMB is 
worthy of some comment. It is 
somewhat sketchy on the features of 
AMB that are common to all 
Microsoft implementations, so that 
some prior familiarity with those 
features would really help the 
reader. Such information is readily 
available from any of the great 
many books devoted to BASICs 
such as the one used by the 
TRS-80®. On the other hand, as far 
as ATARI® specific features go, the 
manual is most detailed, giving ex- 
planations and examples concerning 
player-missile graphics, alternate 
character sets, a complete memory 
map, and conversion information 
for translating programs from other 
BASICS. 

So there you have it. ATARI® 
Microsoft BASIC is large and 
feature-laden. Though not quite 
bug-free yet, there is every reason to 
hope that the major bugs will get 
ironed out before they are frozen 



forever into ROM, as are the flaws 
in A TARI® BASIC. Many users will 
find that its numerous new com- 
mands and statements far offset the 
trade-offs it requires, such as large 
memory requirements, limited 
string length, lack of syntax check- 
ing at the time of program entry, 
lack of abbreviations for keywords, 
etc.. For other users, who would 
like an extended BASIC, but prefer 
the general format of ATARI® 
BASIC, BASIC A + will be a better 
choice (I personally like BASIC A + 
a lot, and for that reason, I've in- 
cluded it in the comparative table of 
features offered by the various 
BASICs). But at least now, 
ATARI® owners will not have to 
stand alone in the crowd of 
microcomputer owners. They will 
have access to the full range of pro- 
grams and techniques offered by 
Microsoft BASIC, if they so choose. 



Editor's Comment: At this print- 
ing, Mr. Leemon had just received a 
copy of the ROM cartridge version 
of Microsoft BASIC and has 
promised an update review in the 
very near future. 

SoftSide readers have, in the past, 
proven themselves to be con- 
noisseurs of the "best of BASICs." 
If Microsoft BASIC lives up to cur- 
rent expectations, it will quickly 
become the standard of ATARI® 
owners. As we do not expect to run 
another general survey of our 
readers until sometime next year, it 
is vital that we find some other 
means for discovering how many of 
you have purchased Microsoft 
BASIC. If you currently own a copy 
of the language, please send us a 
card so we may have you "on 
record." If you purchase a copy in 
the future, please inform us as soon 
as you have done so. As soon as we 
feel the number of responses 
justifies the conversion of our stan- 
dard to A TARI® Microsoft BASIC, 
we will do so. Be sure to include 
whether you own the cartridge or 
disk version of the language and tell 
us how much RAM you have in 
your ATARI®. Send cards to: 

SoftSide Publications 

Department AMB 

6 South Street 

Milford, NH 03055 
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Exploring 

the ATARF 

Frontier 

ANTIC and the 

Display List: Part II 

by Alan J. Zett 



Note: This is the second part of a 
series. Each column assumes that 
the reader has read the previous col- 
umns. To avoid confusion, we ad- 
vise you to start reading the series 
with the first article. 



Looking Back 

Last time I presented some of 
the basics for understanding the 
Display List. Even though it was 
sufficient to give a general idea of 
how the Display List works, a large 
amount of information still remains 
to be explained before you can make 
and use a custom Display List. In 
fact, so much material remains that 
I am dedicating this column 
specifically to the building and using 
of ONE type of custom Display 
List. The discussion of mode line 
options has been postponed until a 
later time. 

The Catch... Revisited! 

As I mentioned, the real advan- 
tage of ANTIC is its ability to mix 
text and different types of graphics 
modes. Modifying the Display List 
to accomodate a custom display is 
easy. After planning how the 
display will look, it merely takes a 
few POKES from BASIC and the 
rest is history. What I didn't men- 
tion (no need to frighten anyone off 
too soon!) were the problems that 
arise when attempting to combine 
modes requiring different amounts 



of display data for each line. Even 
though a particular mode line may 
have a resolution of 160 pixels (a 
pixel being equivalent to one 
character or graphics block), the ac- 
tual number of bytes required for 
that mode line varies with the 
number of pixels stored in each byte 
and the number of colors available. 

GRAPHICS is the simplest of 
screen data displays. One byte is re- 
quired for each character on the 
display. Comparing GRAPHICS 6 
and 7, their resolution is the same, 
but GRAPHICS 7 requires twice as 
much memory because it allows 
twice as many colors. Note also that 
in most GRAPHICS modes, the 
number of bytes per mode line (see 
Figure 1 from last month) is much 
less than the pixel resolution per 
mode Hne (along the X-coordinate). 
Based on the resolution and the 
number of bytes required, 
GRAPHICS 6 packs eight pixels in- 
to a byte (one pixel per bit) and 
GRAPHICS 7 packs in four (one 
pixel per bit pair). We'll get into the 
actual format of screen data later in 
the series. 

ANTIC can control a custom 
display by itself without trouble. 
However, when used in conjunction 
with BASIC, some of its versatility 
is lost as a trade-off for the use of 
BASIC'S screen/video commands. 
This creates the problem of how to 
write on each display line effectively 
without BASIC or Operating 
System (OS) interference. In some 
cases, a simple POKE will allow a 



POSITION/PRINT or PLOT/ 
DRAWTO command to display in- 
formation as easily as from a nor- 
mal Display List. In others, the only 
way to get the screen data to the 
place where it is required is to 
manually POKE it there. 

In general, the most time consum- 
ing portion of the work required to 
create a custom Display List is the 
planning and preparation. Custom 
displays should be designed while 
keeping in mind the problems 
associated with them. In most cases, 
the display you want to use will be 
much more complicated than it 
looks at first. 

There are several common prob- 
lems that will concern you: How 
many bytes of memory does each 
mode line require? (Unequal 
numbers of bytes for each line leads 
to special problems.) Does the total 
number of scan lines add up to 192 
or less? Will a mode line be put in a 
position where its Y-coordinate is 
greater than that which is allowed 
for a Display List of that type? (For 
example: A GRAPHICS mode 
line being placed in the middle of a 
GRAPHICS 8 display would make 
the start of the GRAPHICS mode 
line have a coordinate of, say, 
POSITION 0,77--which in 
GRAPHICS would cause a "cur- 
sor out of range" error). Can the 
Display List be optimized to make it 
easy to use? (This sometimes re- 
quires extra effort. After designing 
the display, there are usually some 
places that need to be padded out to 
make the display easy to use.) None 
of these problems are easy to deal 
with, so in order to give you an idea 
of how to create a simple custom 
Display List, we'll build one. 

A Simple Custom Sample 

The first rule of thumb when 
building a Display List is to map out 
on paper what the screen will look 
like. The most important things to 
consider at this stage are the trade- 
offs required to build a Display List 
that is 192 scan lines long. For our 
first try, we'll start with a "title 
page" effect of mixed text modes. 

To boldy announce our title, we'll 
use the large text mode of 
GRAPHICS 2 followed by a smaller 
descriptive phrase in GRAPHICS 1 
and a small copyright notice at the 
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T.H.E. 

SMART 

TERMINAL' 




TURN YOUR ATARI 400 OR 800 INTO 
A REAL SMART TERMINAL 

Get up to date information from 
services like Dow Jones, CompuServe, 
The Source, and local timesharing 
computers. 

Save the information on disk or cassette 
for editing or reviewing when you 
disconnect from the telephone line! 

Send the edited information back to 
the timesharing system when you are 
ready. 

REDUCE YOUR CONNECT CHARGES 
BY READING AND WORKING OFF 

LINE!! 

• User Friendly 

• Disk or Cassette Based 

• Works with Hayes Smart Modem 

• X-ON/X-OFF Protocol 

• Runs in 16K 

• Serial or Parallel Printers 

• Menu or Command Driven 

• Save Data on Cassette or Disk 

• Upload/Download Atari 400 or 800 

• Multiple files in memory 

This package allows you lo define, 
transmit and receive characters so you 
can send characters and control codes 
not found on the Atari keyboard and 
receive characters that the Atari can 
translate into something it understands. 

A POWERFUL COMMUNICATIONS 
PACKAGE AT A SUPER PRICE! 

T.H.E. MOST Sophisticated Communica- 
tions Package Available for the Atari, 
400 or 800 and its available on Cassette, 
too! 

$49.95 cassette or disk 

ORDERING INFORMATION 

Call BINARY directly to place your 
order. Our order lines are open 24 
hours per day, 7 days per week. 

Shipping and handling charges: 

North America: Add $2.50 
Outside N.A.: Add 10% 
Michigan Residents: Add4'!<.tax. 

Payment Methods: 

VISA, Master Charge, AMEX, cash , 
certified check, personal check 
(allow for clearancoi, money order. 

Look for Binary Software Products at 
your local computer store. 

Dealer Inquiries invited 

COMPUTER SOFTWARE 

3237 Woodward Ave. 

Berkley, Ml 48072 

(313)548-0533 
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Figure 1 

bottom in GRAPHICS 0. Our 
scratch pad for figuring the Display 
List would look something like 
Figure 1. 

The first step in "hand assembl- 
ing" the Display List is to find out 
which of the mode line types being 
used requires the most memory. 
This is determined by looking up (in 
figure 2) the memory requirements 
for each BASIC GRAPHICS mode 
that corresponds to the mode hne 
being used in the display. Looking 
at GRAPHICS through 
GRAPHICS 2 we find that 
GRAPHICS requires the most 
memory. Therefore, when we build 
the diplay list from BASIC, we will 
start by initializing a GRAPHICS 
Display List and then modifying it. 

After the general position of each 
mode line is sketched, the next 
problem to overcome is the adjust- 
ment of the number of scan lines to 
192 and the adjustment of the 
number of mode lines used in each 
portion of the redefined Display 
List so that the display is balanced 
out. If we were to simply modify 
each line we needed to redefine, an 
interesting and somewhat irritating 
problem would arise. 

When we type GRAPHICS at 
the start of the program, the 
Operating System (OS) generates a 
Display List of 24 mode lines con- 
sisting of 40 bytes per display Hne. A 
mode line, in this case, is the AN- 
TIC code for a screen line. A display 
line is the visible physical line which 
the OS sees as starting at multiples 

SoftSide 



of the number of bytes per mode 
line. 

For example: The first byte of 
display line four in GRAPHICS is 
located at the beginning of screen 
memory plus a number equal to the 
sum of the number of bytes per 
mode line (40) times the display line 
number. This means that in order to 
write to the first byte of line four, 
the OS must write to the start of 
screen memory plus 160 (40*4). 
Now if we should change the length 
of hne one to be GRAPHICS 2 (20 
bytes long), the OS would still write 
to screen memory plus 160 (it 
doesn't know that we have removed 
20 bytes from line one). But that 
location will be 20 bytes past the real 
location of the first byte of line 
four. The OS would be looking for 
40 bytes of data for mode line one 
whereas ANTIC only needed 20. 
This would cause the OS to think 
that the next 20 bytes following the 
20 GRAPHICS 2 bytes are still part 
of the same display hne. 

In effect, half of the next mode 
line on the display is actually the 
previous display line wrapping 
around to the bottom. In order to 
write to the second mode line of the 
display (still a GRAPHICS line), 
we actually have to write to the mid- 
dle of the first display line. But this 
is only the beginning of the prob- 
lem. Every time we try to print at an 
X-coordinate of zero following the 
modified mode lines, the text ap- 
pears to be indented 20 BYTES 
(halfway) into the display line. 
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Figure 3 shows graphically what ac- 
tually happens. Display line one 
stretches halfway into mode line 
two, and every display line after that 
is offset by 20 bytes. 

One way to correct this problem is 
to add enough extra mode lines of 
different lengths to bring the start of 
each line back to the left edge. For 
example: If we modify two mode 
lines to be GRAPHICS 2, then all 
the display lines after the 
GRAPHICS 2 mode lines will be all 
right. This is because, by using two 
lines, the sum of the bytes required 
for the GRAPHICS 2 hues comes 
out to be 40. The lines following the 
GRAPHICS 2 lines are shifted 
another 20 bytes, and the screen 
lines up again. The display line 
numbers will be offset by the 
number of extra lines required to 
align the display. Since we have in- 
serted an extra GRAPHICS 2 line 
into the Display List, all the follow- 
ing display line numbers will be one 
LESS than they would normally be. 
The OS thinks that lines one and 
two are all part of line one. 
Therefore, display line four will ap- 
pear to be line three to the OS. AN- 
TIC, however, requires separate 
mode line bytes for each line on the 
display, but when we PRINT/ 
PLOT to the screen, it's the OS we 
have to accomodate, not ANTIC. 

As long as redefinition is kept in 
multiples of the base GRAPHICS 
mode (i.e., the one used as the base 
which is modified), then normal 
screen/video commands will work. 
Of course nothing is THAT easy. In 
order to POSITION and PRINT 



Figure 2: 


Memory Requirements for BASIC Graphics 


Modes. 


GR. MODE 


TYPE 


RESOLUTION 


MEM SIZE 







Text 


40x24 


960 


1 




Text 


20x20 


S60 


2 




Text 


20 X 10 


360 


.3 




Graphics 


40x20 


360 


4 




Graphics 


80x40 


- 560 


5 




Graphics 


80x40 


960 


6 




Graphics 


160 X 80 


1760 


7 




Graphics 


160 X 80 


33m 


8 




Graphics 


320 X 160 


6560 


17 




Text 


20x24 


480 


18 




Text 


20 X 12 


240 


19 




Graphics 


40x24 


240 


20 




Graphics 


. _ . .80x48 


480 


21 




Graphics 


80x48 


960 


22 




Graphics 


160 x 96 


1920 


23 




Graphics 


160 x 96 


3840 


24 




Graphics 


320 X 192 


7680 



there are some special things to do, 
as we'll see later. 

Now we should write down the 
number of bytes per mode line on 
our scratch pad, and next to that the 
number of scan lines each mode line 
takes (see figure 1 last month). 
GRAPHICS 2 requires 20 bytes per 



line at 16 scan lines per mode line. 
GRAPHICS 1 requires 20 bytes per 
line at 8 scan lines per mode line. 
GRAPHICS requires 40 bytes per 
line at 8 scan lines per mode line. By 
putting 2 lines of GRAPHICS 2 at 
the top of the display, and 2 lines of 
GRAPHICS 1 in the middle, all 




Figure 3 



iGRAPHICS ZERO: 



GRAPHICS TWO 



GRAPHICS TWO 



GRAPHICS zero: 



aRAPMICS ONE 



QRAPHICS ONE 



GRAPHICS ZERO 



Figure 4 
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GRAPHICS lines start at the left 
edge where they belong. The prob- 
lem now is that when we add up all 
24 GRAPHICS mode lines (in- 
cluding the ones we will modify) the 
scan line count comes out to be 208 
— too many. We can solve this by 
removing excess GRAPHICS lines 
from the bottom of the Display List. 
Taking out two GRAPHICS lines 
will adjust the scan line count to 
be 192. 

Figure 4 is a completed outline of 



the custom Display List. All that re- 
mains now is to actually modify the 
standard BASIC GRAPHICS 
Display List. It would be a good ex- 
ercise to translate, on paper, what 
the Display List should look like, 
and then look at Figure 5. Compare 
this to the GRAPHICS Display 
List (Figure 2 last month). 

The Modifying Begins 

What we want to do now is to 



Figure 5: A Modified Graphics Zero Display List 


DL BYTE NO. BYTE VALUE 


MODE TYPE 


1 112 


Blank 


2 112 


Blank 


3 112 


Blank 


4 66 


Graphics w/LMS option 


5 nn 


Least significant byte of screen memory 


6 nn 


Most significant byte of screen memory 


7 2 


Graphics 


8 2 


Graphics 


-..- ?^ ~r- - ' ---..-.— T ■^■ 


Graphics 


10 7 


Graphics 2 


11 _; _ 1_ 


Graphics 2 


12 2 


Graphics 


13 2 


Graphics 


14 2 


Graphics 


15 2 ■ 


Graphics '■.■•. - ■• 


16 2 


Graphics 


17 6 


Graphics 1 


18 6 


Graphics 1 


19 2 


Graphics 


20 2 


Graphics 


"^ 21 2 


Graphics -.■.■.■•■ ...<.., 


22 2 


Graphics 


23 2 


Graphics 
Graphics 


24 2 


25 2 


Graphics 


26 2 


Graphics 


27 2 


Graphics < ,. , . 


28 65 


Jump w/WVB option 


29 nn 


Least significant byte of DL 


30 m 


Most significant byte of DL 



generate a GRAPHICS Display 
List and modify it to look like 
Figure 5. We start by executing a 
GRAPHICS command and 
PEEKing into memory to find out 
where the OS has put the Display 
List. The following hnes of BASIC 
will accomplish this: 



10 GRAPHICS 0:PQKE 752,1 

20 DL=PEEK(560)+PEEK(561)»256 



After these lines have been ex- 
ecuted, the variable DL will point to 
the first byte of the Display List. 
Since the first three bytes of any 
Display List are blank mode hne in- 
structions (see last month), I usually 
offset the pointer by four. The 
variable DL will then point to the 
location of the first byte of screen 
data. As an extra benefit, this will 
make display line number one etjual 
to DL-1 and display lines two and 
up equal to DL + 2, +3, and so on. 
This seems confusing at first, but 
there is a twisted sort of logic in- 
volved if you look hard enough. 

Next, we pick the Display List 
byte that approximately cor- 
responds to the location drawn on 
our scratch pad. In this case, line 
five in GRAPHICS is the closest. 
Then we must calculate the position 
of the byte to modify, and POKE it 
with the ANTIC code that cor- 
responds to the GRAPHICS mode 
we want to use. If you look at 
Figure 1 from the last installment, 
you will find that GRAPHICS 2 is 
known to ANTIC as a mode num- 
ber 7 byte. By POKEing this into the 
location we calculated, we will have 
modified one line on the screen. To 
defeat the previously discussed con- 
flict that arises from GRAPHICS 2 
requiring only 20 bytes of screen 
data, we can also POKE the next 
location with 7, and the screen will 
line up again. We can now add these 
Hnes to the program: 



30 DL=DL+4 

40 POKE DL+5,7:P0KE DL+6,7 

Display line 12 is the nearest ap- 
proximation of the next set of lines 
to be modified. GRAPHICS 1 is 
listed as being equivalent to ANTIC 



76 Jk 



SoftSide 



A\AR\ 



mode 6. Adding line 50 takes care of 
the subtitle line: 

50 POKE DL+12,6:P0KE DL+13,6 

Now that the Display List has 
been modified, all that remains to 
complete the Display List is to 
shorten it to 192 scan lines long. All 
we really have to do is to write the 3 
bytes required to end a normal 
Display List into memory two bytes 
lower than the location they already 
occupy. This ehminates two lines of 
GRAPHICS and brings the scan 
Une count to 192. If you remember, 
the bytes required to end a Display 
List are a 65, followed by the 
memory location of the start of the 
Display List in LSB, MSB order. 
These two bytes are conveniently 
stored for us at memory locations 
560 and 561. Lines 60 and 70 will 
shorten the display and complete the 
modifications: 

60 POKE DL+2S,65:P0KE DL+29, PEEK (560) 
70 POKE DL+30, PEEK (561)!? CHR$(125) 

How It Looks 

When all of the above lines have 
been typed in and the program has 
been RUN, a normal display will ap- 
pear on the screen with the excep- 
tion that two sections of the display 
are black. This is because the 
modified lines are operating in a 
GRAPHICS mode that uses a dif- 
ferent color than the background. 
This can be eliminated by making 
both background colors the same. 
Add line number 80 shown below; it 
will reset the colors so that the 
screen is uniform: 
80 SETCQLOR 2,9,0!SETC0L0R 4,9,0 

The only things remaining for our 
title page are the PRINT statements 
to write the display. Remembering 
that the POSITION statement is 
now slightly out of kilter because of 
the GRAPHICS 1 and 2 mode Hnes, 
the only way to write to the screen 
effectively is to make a guess. The 
guess should be based on the screen 
format, and repeated, by trial and 
error, until text appears where it is 
required. We know that the display 
is now two lines shorter than before 
(we eliminated them to bring the 
scan line count to normal). We also 
know that the matched set of 
GRAPHICS 1 and 2 lines are con- 
sidered a pair of single lines by the 
OS. It turns out that line four is the 



start of the GRAPHICS 2 line and 
line ten is the GRAPHICS 1 hne. 
The following hnes print to the 
screen, at a position derived by trial 
and error, to center the text and 
display: 

90 POSITION 4,4:? "STAR SLAYER" 

100 POSITION 4,10:? "the ultiBatB"!POS 

ITION 25,10:? "space qaie" 

110 POSITION 4,17:? "(C) 1982 - SoftSi 
de Publications" 

Pay particular attention to hne 
100. When the program is RUN, the 
words "SPACE GAME" are on the 
line following the words "THE 
ULTIMATE", but the POSITION 
statement is pointing to the same 
hne. As mentioned before, the OS 
now thinks that the second line is 
part of the first. Line 100 could be 
rewritten to read: 

100 POSITION 4,10:? "the ultiaate 
space gate" 

LINES 120-170 ADD SOUND. 

120 FOR X=l TO 4 

130 FOR Y=255 TO 100 STEP -2.5 

140 SOUND 0,Y,10,8:SOUND 1,351-Y,10,8 

150 NEXT Y:NEn X 

160 SOUND 2,201, 10,8:80UND 3,253,10,8 

170 SOTO 170 

Now that the title page is done, 
the screen will stay modified either 
until another GRAPHICS com- 
mand is executed or until SYSTEM 
RESET is pressed. Try some ex- 
perimenting with the display. Type 
on the modified lines in combina- 
tions of inverse and lowercase — the 
effects can be fascinating. Try using 
different codes when POKEing the 
Display List. Or try POKEing dif- 
ferent locations. It's up to you. You 
can learn more by experimenting 
with your own ideas than from a 
hundred articles explaining how it 
works. If you should discover 
something interesting, write in and 
tell us about it so we can let others 
know. If we all pitch in for the com- 
mon good and the general improve- 
ment of ATARI® software, we can 
all benefit. 

Next time we'll get into some of 
the other types of Display Lists and 
the problems which arise when using 
them from BASIC. As always, I'm 
more than anxious to hear com- 
ments and advice from any reader 
of SoftSide. © 
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YOU'VE MADE IT, 




AND IT'S BEAUTIFUL. 

The Printer Stand KIT 

If you want to save money and enjoy 
a fun, rewarding ctiallenge, ttien ttie 
Printer Stand Kit is for you. Just 
chieck the benefits. 

• The beautiful wood design is a wood 
worker's delight, designed to highlight 
your computer desk and save space for 
continuous paper and forms. 

• All parts are precut and routed-ready 
for assembly to save you time. 

• You choose the stain or color and finish 
the rich 7/8" oak sides and 3/4" oak 
veneer top to your preference. (Stain and 
varnish not included.) 

• The generous size of both our stands 
(please compare size and price) allows 
the optional use as monitor or TV holder. 

Instructions are complete with photos for 

easy assembly. Work time approx. 1 'h hours. 

Standard Size $27.95* 

(17 1/4" X 13" X 5 3/4") Comfortably holds the Epson 
MX-80. NEC-8023A-C. Okidata 82A, etc 

King Size $31.95* 

(22 3/4" X 13" X 5 3/4") Epson MX-100. Okidata 83A 
etc. held with ease. 

ORDER TODAY FROM .„,^^,„„, 

_ . „.. ^ . Add $3.00 for shipping 

Oak Kit Hardware ^„^ handling. Terms: Cert- 

8689 N. 63rd Street ified check or money order. 

Brown Deer, Wl 53223 Wl residents add 5% tax. 



SWAT 

There is an important omission 
from the ATARI® SWA T documen- 
tation published in Issue #30 of 
SoftSide. Before appending SWAT 
to a program in memory, the pro- 
gram to be SWATed must first be 
LISTed to disk or cassette (using 
LIST "D:FILENAME" for disli or 
LIST "C:" for tape). Next, turn the 
computer off, tlien on again, to 
clear the system and ENTER the 
program back into memory (using 
ENTER "D:filename" for disk or 
ENTER "C:" for tape). Because of 
the unique method in which 
ATARI® BASIC stores variables in 
a program, the variable table must 
always be in the same order to pro- 
duce accurate SWAT codes. 
LISTing and ENTERing the pro- 
gram is the only known way to 
rebuild the variable table in a 
specific order so that SWA T codes 
can match. Note that all SWAT 
tables published in Issue 30 are cor- 
rect and any differences in a SWAT 
listing indicates a typing error in 
your program. q 
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Starbase Gunner is an 
arcade style game for a 
TRS-80® Model I or III with at 
least 32K RAM and disk drive. 
It is included as the bonus pro- 
gram on this month's TRS- 
80® Disk Version. 



Congratulations! You've been 
promoted to Commander and have 
been assigned your own starbase. 
You're on your first mission in deep 
space and it's proving to be an "initia- 
tion by fire." Your sub-space radio 
screams a warning signal — an invading 
enemy fleet is headed straight for your 
station! You are the only one who can stop 

them. 

Your starbase is armed with four powerful 

laser cannons, which are aimed directly at 

the four hyper-space paths the enemy will 

have to use. You know from intelligence reports 

that some of the enemy ships can be destroyed 
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with a single shot while 
others carry strong armor 
shields and must be hit twice 
You also know that the in- 
vaders will come out of their 
hyper-space warp very close to 
your starbase. You'll never be 
able to tell which path an invader 
will use, so you'd better be very 
quick on the trigger. You must also 
aim carefully as you will be penalized 
for wasted shots. 

The "Q" and "W" keys fire the top 
left and top right lasers. The < and > 
keys fire the lower left and lower right 
lasers. Your starbase can be regenerated 
twice if hit. Your third chance will be your 
last. Your defense scanners have audio 
capability, which you may use by plugging 
the tape-out cable into the AUX input of your 
cassette player and pressing PLAY and 
RECORD. 

Good luck. May your first mission not be your 
last. G 
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The Adventure is 





Available' 
on disk, 
cassette or 
SUPER DISK 



June 1982 
Arrow One Adventure 

You are Adam Trent, a trouble-shooter for 
the Federation of Space. You descend to an 
alien pianet and make a horrifying 
discovery, which impels you into a 
desperate and dangerous quest. This 
unique science fiction adventure will test 
your skills and ingenuity. 



May 1982 
Titanic Adventure 

You are the Captain of the Titanic on her 
maiden voyage. Suddenly a large white ob- 
ject comes into view through the window. 
Can you avoid the historic collision? If not, 
can you save the lives of your passengers 
and crew? 



April 1982 
Witches' Brew Adventure 

You find yourself in an enchanted forest. 
You must find your way to the castle and 
rescue the Princess who is chained Inside 
its dungeon. A tightly-woven blend of fan- 
tasy, horror, and science fiction, this com- 
plex adventure will challenge your wits and 
ingenuity. 



IVIarcii 1982 
James Brand Adventure 

The President's life is in danger. As 
James Brand, you must save his life and 
destroy the evil Dr. Death. Your life is con- 
stantly on the line; each move you make 
could be your last. "Your assignment, Mr. 
Brand...." 



February 1982 
Klondilte Adventure 

Snow, Ice, and bitter cold surround you. 
Your search for fame and fortune in the nor- 
thern country will lead you through many 
perils, but you may also see some familiar 
faces along the way. This breezy adventure 
will keep you occupied inside while the 
winter winds blow outdoors. 



January 1982 
Windsloe IVIansion Adventure 

A famous prisoner lies in the dungeon of 
an old mansion. An underground passage 
connects the mansion with the Blair house, 
whose owners will help you to rescue the 
prisoner. Can you overcome the human and 
the supernatural creatures who inhabit 
Windsloe Mansion? 



December 1981 
Blacl< Hoie Adventure 

The crew of an interstellar craft discovers 
the long-lost Deep-Space Probe One, the 
Cygnus, at the edge of the vortex surround- 
ing an immense black hole. See if you can 
foil the plans of Dr. Hans Reinhardt. 



November 1981 

Around tlie World in Eighty Days 

Adventure 

Try to repeat the feat of the classic novel, 
complete with a balloon and other exciting 
features of the original adventure. Are you 
ready to take the challenge? Bon voyage! 



October 1981 
Crime Adventure 

Test your skills as a detective, sifting 
through hundreds of clues. You may have to 
become the new Sherlock Holmes to solve 
this one! Look for the strange, but don't 
overlook the obvious, as you try to find Mrs. 
Fenwick and return her to where she 
belongs. 



September 1981 
Jacic The Ripper Adventure 

Jack the Ripper is running rampant in 
London and you must stop him! Scotland 
Yard demands that you take action, and the 
only answer is to set yourself up as a decoy. 
Be careful how you plan your costume, or 
dear Jack will laugh hysterically and leave 
you in the dust! 



August 1981 
Treasure Island Adventure 

You are a hardy adventurer In search of 
fame, fortune, and whatever else you can 
get. You find yourself on an island where 
there is rumor of pirate's treasure. But 
watch out for the evil magician and the 
underground torture chamber! You may end 
up in a spot where all roads coming into it 
are paved with good intentions. . . 
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July 1981 
Alien Adventure 

You are the sole survivor of a crew on a 
mission to deliver a cargo of oil to Earth. A 
crash landing has left you stranded on a 
small planet, harshly alien but rich in lead, 
gold and platinum. You must find provi- 
sions and a means of leaving the planet. 
But beware of the THING that massacred 
your crew! 

SoftSide 



June 1981 
Arabian Adventure 

As Sinbad, the mightiest sailor in ancient 
Arabia, your mission is to rescue Princess 
Jasmine from the clutches of the Wizard of 
Darkness. You will cross the Seven Seas to 
the deadly Cyclops Mountain, and do battle 
with skeletons, a one-eyed beast, a hairy 
tarantula and more monsters who try to 
thwart your noble pursuit. 



Wait ins for You 
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JULY ADVENTURE OF THE MONTH 
ROBIN HOOD 

Thou art somewhere in Sherwood Forest. ..Thus it begins. 
Take up thy bow and arrow, and gather thy merry men, for 
thou art Robin Hood. There are rich merctiants to rob and 
great deeds to do. But have care, bold Robin! The sheriff of 
Nottingham longs to see thy neck in a noose. Thou wilt surely 
need all thy wit and cunning to succeed. 



How would you like to go back in time 
to 19th century London to match wits 
with Jack the Ripper? Out into space to 
brave the swirling vortex of a black 
hole? Into the depths of the ocean, or 
on a quest to rescue a beautiful 
princess from the clutches of evil 
monsters? 

You never know where SoftSide 
Magazine's Adventure of the Month 

might take you. But you can be sure 
that each month you will experience 
new delights and new challenges as you 
receive an original adventure on tape or 
disk, ready to load into your computer. 

The cost? A six-month membership is 
just $29 for the tape ($4.83 per adven- 
ture) or $49 for the disk ($8.16 per adven- 
ture). If you're not sure that you can 
take six full months of excitement, you 
can order a single tape for $7 or a disk 
for $10. Or, if you're especially adven- 
turesome, we're offering disks, packed 
with three great adventures, for only $26 
per disk. 

Please use coupon below (or the bind- 
in card in this issue) to order. 




en t 
.^"^ of the^ ^o, 




6 South Street, Milford NH 03055 



I Yes, I'm ready to start! Send me Adventures — 



I" 



Six month subscription: 

D Cassette — $29 

D Disk — $49 

Individual adventures (please specify) 



n Cassette — $7 each 
D Disk — $10 each 

Three adventures on one super disk ($26 each): 

n Arabian, Alien, and Treasure Island Adventures 
n Jack the Ripper, Crime, and Around the World Adventures 
D Black Hole, Windsloe Mansion, and Klondike Adventures 
D James Brand, Witches' Brew, & Titantic Adventures 



Please specify which computer: 

D Apple™ (req. 24K for tape, 32K for disk) 
D ATARI® (req. 32K for tape, 40K for disk) 
n TRS-80® (req. 16K for tape, 32K for disk) 

Name 



Address _ 
City/State_ 



-Zip- 



n MasterCard D VISA 
Nanne of Cardholder 



MG#andlnterbanl<#/VISA# 

Exp. Date Signature 

Prices subject to change wittiout notice, AppieTM, ATARI'" and TRS-SO*' are registered 
trademarks of Ttie Apple Computer Company, Warner Communications and The Tandy 
Corporation respectively. 
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K-Byter 




Pegboard Solitaire 






A TRS-80® K-Byter by Bernard 


100 aEflR500!DEF!NTF-N,T;DEFSTRA.X,0:DIMA(15).N(!5):J(=CHR»(179) + 




Harford, Waynesboro, MS. 


CHR«( 14(1) +CHR$ (179) !0=CHR$(!91)+CHRl(179:i+CHR»( 191) 

110 CLS:PRINT33.'H0VES";:F0RK=lT015!REflDN(K):FRINTJN(f;)-l,)(i:PRI 




Pegboard Solitaire is played on a 


NTJN(K)+i3,K:fl(K)=K:NEXT!DflTA32, 156, 164,280,288,296,404,412,420, 




triangular board with fifteen holes 


428,528,536,544,552,560 




containing fifteen pegs. The object 


120 PRINTS729,"N0VE NUMBER •;«; 




of the game is to remove all the pegs 


130 PRINTi850,CHR»(31)'M0VE FROM ";:INPUTF 




but one. 


140 PRINT3867,"M0VE TO ■::INPUTT!lFF=99990RT=9999TH£NRUNELSEIFF) 




Pegs are removed by jumping 


150RTM5THEM170 




them with an adjacent peg into an 


150 IFM=OTHENA(F)=0:PR1NT3N(F)-1,0;!H=M+1:SOT0120 




empty hole. All three must be in a 


160 IF(N(F)+N(T))/2=N((F+T)/2)ANDA(F)=)(ANDA(T)=0ANDA((F+T)/2)=XT 




straight line. 


HEN180 ELSE170 




When you start, the board will be 


170 PRINTJ981,' INVALID MOVE - REENTER";!F0Rli;=lT0210O!NEXT:BOTO13 




filled with pegs. Enter the number 







of the hole you wish to leave empty 


180 A(F)=0:A(T)=X:A((F+T)/2)=0:PRINTSNiF)-l,0!:PRINTSN(T)-l,)(j:P 




to start the game and press 


RINT8N((F+Ti/2)-l,0!:N=M+l:L=L+64:PRINTaL,USING"l« II!H";I1-1;F 




ENTER. In subsequent moves, 


!'-"iT;i60T0120 _ 




enter the number of the peg with 


190 END 




which you are jumping and press 






ENTER. Then enter the number of 
the hole where the jumping peg will 






Ml~)l J^C ■ ■ 




land and press ENTER. If you 




t 


make a mistake in the first part of 






your move, press ENTER for the 






second part to redo. To restart the 


1* 


game, enter 9999 as either part of 


l^^HI^H 




your move and press ENTER. 


X p X hHI 




The puzzle can be solved in 13 


7-9 ~ ^^H 




moves. 


q q J.. ^ hmH 






^; 11 q ^ qfl 








MOVE ■^^^H^l^^^l 


■ 
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CONNECTING 
DOTS 



o 



' 
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by Charles E. Wooster 

Connecting Dots is a one or two 
player game for a TRS-80® Model I 
or III with 32K RAM. (See instruc- 
tions below for 16K modifications.) 



In Connecting Dots, each player, 
in turn, draws a line between two 
adjacent dots. The Hne may be 
either horizontal or vertical. If a box 
is formed by the line, the player 
scores a point and receives another 
turn. When a game board has been 
completed, the player with the 
highest score wins. 

When the game starts, a menu of 
four options is displayed. Option 1 
begins the game. Option 2 allows a 
previously saved game to be loaded 
and played from the point at which 



it was saved. Option 3 provides in- 
structions on how to play the game. 
Option 4 allows you to quit if you 
decide not to play. 

Option 1 will ask for the names of 
the players. The first player entered 
will be the first to move. If 
"TRS80" or "COMPUTER" is 
entered as either player, the com- 
puter will be the opponent. If both 
players are entered as "TRS80" 
and/or "COMPUTER", then, the 
computer will play against itself. 

The computer can play with two 
levels of skill. The level chosen takes 
effect when drawing of a line will 
allow the other player to score. At 
level 1, the computer will play its 
best, but slowest game (10 to 360 
seconds per move). At level 2, the 
computer may make a minor 
mistake or two, but will play a much 



faster game (10 to 60 seconds per 
move). 

A move is entered by typing the 
move coordinates NL,NL. The first 
NL is the Number-Letter coordinate 
of the "FROM" location and the 
second NL,NL is the Number-Letter 
coordinate of the "TO" location. 
The computer will generate the 
separating comma. 

After the coordinates are entered, 
you will be asked to verify them. If 
they are not correct, respond 
"N"and you will be given another 
chance. If they are correct, respond 
"Y" or "X". If the response is 
"X" and a box is formed, the com- 
puter will continue forming boxes 
for you until no more can be formed 
(a time saver). 

There are two special move coor- 
dinate entries available. If NL,NL is 
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entered as PR.NT the screen will be 
sent to your graphic printer. If 
NL.NL is entered as SA,VE the 
game will be saved on cassette tape 
for later completion or continued 
play. An initial menu selection of 2 
will load and resume the game. 

After the game has been saved, 
you have the option of continuing 
the game, starting a new game or 
quitting. If you choose to continue 
the present game, or when the game 
is loaded, you will be given the addi- 
tional option of changing the 
players. If one or both of the players 
is "TRS80" and/or "COM- 
PUTER" you will also be allowed 
to change the computer's skill level. 

The program, as listed, requires 
at least 32K of memory and utilizes 
tape input and output. The instruc- 
tions may be deleted from the pro- 
gram to make it fit into 16K (See the 
documentation for Hnes 9030-9380). 
Changes to provide disk input/out- 
put follow the program listing. 

Lines 6400 to 6590 are the screen 
print routine. This routine is written 
for an Epson MX-80 printer 



Ancestry I /III 

TRS'80* based genealogy system 

for both the amateur and 

professional. 

Features: 

Individual Records 

Family Group Sheets 

Ancestor Charts 

Model I or III, 48K, 

single or dual drive, 

printer for production 

of sheets and charts. 

$69.95 

+ 

$2.00 shipping/handling 

(Mass. residents add i%) 

Soft-Gene 
II John Swift Rd. 
Acton, MA 01720 



*TRS-80 is TM of Tandy Corp. 



84 i^ 



operating in MX-80 mode. A 
change is provided in the documen- 
tation for this routine to support the 
MX-80 in TRS-80 mode, or other 
graphics printers that support 
"standard" TRS-80 graphic codes. 
The routine uses some MX-80 
features, such as double-width 
CHR$(14) (CHR$(20) to turn off), 
compressed CHR$(15) (CHR$(18) 
to turn off) and double-strike 
CHR$(27) -I- CHR$(7 1 ) (CHR$(27) 
-l-CHR$(72) to turn off), which 
may not be available or may use dif- 
ferent codes on your printer. You 
may need to change this routine to 
suit your printer. If you don't have 
a printer, remove the routine by 
following the instructions in the 
routine's documentation. 

The description of the game in- 
dicates there are four possible menu 
selections, but there are actually 
five. The fifth, undocumented selec- 
tion provides a debugging facility 
for the computer playing routines. 
If this selection is chosen when it is 
the computer's turn and a scoring 
situation exists, timing and key 
variable values are displayed on the 
bottom three lines of the screen. 
Due to the use of the TIMES func- 
tion in this routine, debugging does 
not work on a Model I cassette 
system. 

There are 2 main arrays used by 
the program which warrant some 
explanation: 

The box (BX) array is a 2 dimen- 
sional array. There are 82 elements 
in the first dimension — to 81 , ele- 
ment is not used, and elements I 
through 81 correspond to the 81 
possible boxes. The second dimen- 
sion contains 5 elements — to 4. 
is the number of sides completed 
and 1 through 4 index the lines 
which form the sides of the box. 

The line (LI) array is a 2 dimen- 
sional array. There are 181 elements 
in the first dimension — to 180, 
element is not used, elements 1 
through 90 correspond to the 90 
possible horizontal lines and 
elements 91 through 180 correspond 
to the 90 possible vertical lines. The 
second dimension contains 5 
elements — to 4. is the line 
number if drawn, zero if not, and 1 
and 2 are the X,Y screen coor- 
dinates of the left/top of the line. 3 
and 4 index the boxes formed by the 
line. 
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The computer playing routines 
use these variables: 

CI: Index to CX array. 

C2: Index to CY array. 

C3: Index to CZ array. 

C4: Index to CL array. 

CB: Current simulated score 

counter. 

CC: Lowest simulated score 

counter. 

CL(180): Simulated Hnes drawn 

(level 1 and 2). 

CP(180): Simulated hnes drawn 

(level 2 only). 

CX(I80): Lines which will not 

allow score to occur. 

Simulated Hne array. 

Used by fireworks subroutine as a 

work array. 

CY(IOO): Lines which allow score 

to occur. 

Used by fireworks subroutine as a 

work array. 

CZ(81): Simulated box array. 

The player defining variables 
are: 

PC: Index to player arrays. 
PL(1): Computer skill level. 
PN$(1): Name of player. 
PS(1): Player's score. 
PW: Index of winning player. 
PX: Index of losing player. 

Miscellaneous variables: 

BT: Total boxes formed. 
CO: Index to screen line position 
(save routine). 
DB: Debug switch. 
ER & ER$: To location "L" coor- 
dinate. 

HE & HE$: From location 'N' 
coordinate. 

LN: Number of last line drawn 
or next to be drawn. 
Lowest scoring line in computer 
routines. 

LT: Total lines drawn. 
RE & RES: From location "L" 
coordinate. 

RO: Index to ROS array. 
RO$(12): Box, line and screen save 
array. 

SC: Score from last line drawn. 
TH & THS - To location "N" 
coordinate. 

TXS: What is next value for- in- 
struction routine. 
X$: Keyboard response. 
X, Y & Z: Vulnerable work 
variable. 
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Entered when it is the computer's turn and a 
move will allow the opponent to score. The 
routine expects array CY to contain the index 
pointers into array LI for the lines not drawn 
which will complete the 3rd side of at least one 
box. The routine simulates the moves allowed by 
each line in array CY and picks the line which 
allows the fewest moves at skill level 1. At skill 
level 2 the routine bypasses lines which were 
already touched in previous moves, allowing a 
faster selection, but causing the routine to 
overlook a lower score under certain 
circumstances. 




2030 IFC2>06DT02050 

2040 PRINTJB%,CHR»(3l))PN»iPC)i"' 

le teriinated.":STOP 



5 unable to locate a aove - ga 



iNEUX 



20i0 F0RX=0T081;CZ(K)=BX()!,0):NEXT1( 

2070 CC=81:LN=0 

2080 F0RX=1T0C2 

2090 I FCP (CY ( X ) X >0ANDPL ( PC ) ) 1 60T02360 

2100 PRINTJ894+LEN(PN»(PC))M6,"let5 see iaybe "i 

2110 PRINTCHR«((LI(CY(X),l)-22)/8+48)!CHR$((Ll(CY(X),2)-10)/3+65 

' I I ) 

2120 IFCY(X)<91THENY=8!Z=0ELSEY=0:Z=3 

2130 PRINTCHR$(<LI(CY(X),l)-22+Y)/BMB)iCHR«((LI(CY(X),2)-10+Z)/ 

3*65) ! 

2140 IFDB=1PRINT8960,"FR0H!";X;"T0"!C2;" CRNT:°)CY(X)i" LOWi^CC 

;■ LINEs-jLN! 

2150 CB=0:C4=1:CL(C4)=CY(X):CP(CY(X))=:CY(X):CX(CY(X))=CY(X) 

2160 IFLI(CY(X),3)=0THENC3=LI(CY(X),4);CZ(C3)=CZ(C3)+1:60T02180E 

LSEC3=LHCY(X),3):CZ{C3)=CZ(C3)+1 

2170 IFLI(CY(X),4)<>0THENCZ(LI(CY(X),4))=CZ(LI(CY(X),4))+1 

2180 IFCZ(C3)<>3G0T02270 

2190 F0RY=1T04 

2200 IFCX(BX(C3,Y))=0THENC4=C4+1:CL(C4)=BX(C3,Y)!CP(BX(C3,Y))=BX 

(C3,Y):CX(BX(C3,Y))=BX(C3,Y):Y=4 

2210 NEXTY 

2220 CZ(C3)=CZ(C3)+1:CB=CB+1 

2230 IFLI(CL(C4),3)<>C3ANDL1(CL(C4),3)<>0THENC3=LI(CL(C4),3);CZ! 

C3)=CZ(C3)tl!60TO2250 

2240 IFLI(CL(C4),4)<>C3ANDLI(CL(C4),4)<>0THENC3^Ll(CL(C4),4)iCZ( 

C3)=CZ(C3)+1£LSE2260 

2250 IFCZ(C3)=4THEMCB=CB+1 

2260 IFCB=>CCTHEN2290ELSE2180 

2270 IFL!(CY(X),4)<>0A«IiCZ(LI(CY(X),4))=3THEHC3=LI(CY(X),4)!G0T0 

2190 

2280 iFCB<CCTHENCC=CB:LN=CYiX) 

2290 F0RY=1T0C4 

2300 IFL1(CL(Y),3)<>0THENCZ(LI(CL(Y),3))=CZ(L1(CL(Y),3))-1 

2310 1FLI(CL(Y),4)<>0THENCZ(LI(CL(Y),4))=CZ(LI(CL(Y),4))-1 

2320 CX(CL(Y))=0:CL(Y)=0 

2330 NEXTY 



2340 IFCC=10RC4=C2THENX=C2 

2350 1FDB=1THENPRINT8B54,RI8HT<(TIHE«,5); 

2360 NEXTX 

2370 1FLNO0THEN3520ELSE2040 

Entered when it is the computer's turn and the 

boxes on either side of the line last drawn 

cannot be completed. The routine first inspects 

the BX array looking for a box which can be 

completed. If no boxes are found to complete, it 

builds arrays CX and CY. Array CX indexes lines 

which will not allow the opponent to score, array 

CY indexes lines which, when drawn, will allow 

the opponent to score. After the arrays are built 

and the CX array contains entries, a random 

selection is made. 

2130 IFXt="X"60T03040 

2440 C1=0:C2=0:X=0 

2450 IFDB=1THENFORY=OT02:POKE16919+Y,0!NEXTY:PRINT8832,RI6HT$(TI 

I1E»,5); 

2460 F0RV=1T081 

2470 IFBX(Y,0)=3THENX=Y;Y=81 

2480 NEXTY: IFXO060T02660 

2490 F0RX=1T0180 

2500 IFL1(X,0)<.>OGOT02520 

2510 IFBX(LI(X,3),0)<2ANDBX(LI(X,4),0)<2THENCl=Cl+lsCX(Cl)=XELSE 

C2=C2+1:CY(C2)=X 

2520 NEXTX 

2530 IFDB=1THENPRINTJB43,CHR«(30)!RIGHT«(TII1E»,5); 

2540 I FC 1< >OTHENX=RND (CI ) ; LN=CX ( X ) : 60T03520ELSE2030 

Entered when it Is the computer's turn with 
variable LN indexing the last line drawn. The 
routine inspects the BX array for boxes on either 
side of the line to see if either one can be 
completed. 

2630 PRINT"Hu«M ": 

2640 IFBX(LI<LN,3),0)<.>3ANDBX(LI(LN,4),0)<>3GOT02430 

2650 IFBX(LI(LN,3),0)=3THENX=LI(LN,3)ELSEX=LI(LN,4) 

2660 FORY=1T04 

2670 IFLI(BX{X,Y),0)=:0THENLN=BX(X,Y);Y=4 

2680 NEXTY :G0T0352O 

Determines which player is next, displays the 
current score, then prompts the player for the 
move coordinates. Invokes the PR, NT and SA,VE 
options when they are chosen. 
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3030 IFPC=0THENPC=1ELSEPC=0 

3040 PRINT90, "Line! "iLTi" Score: ";CHRt(183)+CHR«(179)+CHR«(187 

)i" "jPNtlOJiV'tPSCO)!" ";STRINS«(3,191)!' ";PN«(l)i"!"jPS(l 

); 

3050 PR!NT8B96,CHR*(31)!PN«(PC)"s turn - "j 

30i0 IFPL(PC)<>0G0T02630 

3070 PRINT'enter love co-ordinates (NLjND? '■, 

3080 60SUBi830:HE«=X$:IFHE«="THEN3080 

3090 GOSUBi830:RE»=X$!lFRE«="THEN3090ELSEPRINT", ■; 

3100 B0SUBiS30:TH$=X«:IFTH*=""THEN3100 

3110 60SUB6830:ER»=X«;IFER«=""THEN3110 

3120 IFHE»="P"ftNDRE»="R"flNDTH$="M"ANDER$="T"THENB0SUB6A30:60T030 

*0 

3130 lFHE$="B"ANDRE»="ft"ftNDTH»="V"flNDER«="E"S0T07030 

J140 PRlNTJ89i,CHR«(30)iPN»(PC)"s turn - verify co-ordinates "; 

HE«iR£«j',"iTH*;ER*!" <y,N or X>? '; 

3150 B0SUB6830!lFU="THEN3150 

3140 IFU="N'GOT03050 

3170 IFX$<>'Y"ANDU<>'X"G0T03530 

3180 HE=ASC(HE«)-48jIFHE<00RHE>9G0T03530 

3190 IFASC(RE».UASC("A")0RASC(REt)>ASC("r)G0T03530 

3200 TH=ASC1TH«)-48:IFTH<OORTH>960T03530 

3210 IFASC(ER*)<ASCCAM0RASC(ER»))ASCCJ")G0T03530 

Validates the entered move coordinates and 
converts them to a line number in variable LN. 
The routine then ensures that the specified line 
was not previously drawn. 



IS JEW pLASSICS SOFTWARE 
1 3SC3.1''OU Phelps Gates 

This friendly, easy to use version of Standard Pasco/, as 
reviewed in the December 1981 Byte, is now even better! 
New version works onTRS-80 Model landModellll, under 
TRS-DOS, NewDOS, NewDOS 80, DOSPIus, LDOS, and 
DoubleDOS. An author pacl^age allows you to create your 
own /CMD files without any royalty payments! Upper and 
lower case is fully supported. You can protect memory and 
call machine language programs. New extensions include 
SET, RESET, POINT, RND, and the UCSD Include procedure. 
Utilities are provided to convert to and from ASCII files. 
Pascal80nowcomesinabinderwithan80pagemanualby 
George Blank. 

With monitor, editor, and compiler in memory at the same 
time, no other Pascal is easier to learn! One college found 
that it could teach half again as many students on the same 
number of computers after switching from UCSD Pascal to 
Pascal 80. 

Full 14 digit accuracy on all math functions, including log 
and trig functions, makes this a serious Pascal. Disk file 
handling is supported, with a mail list program included as 
a demonstration. 

Upgrades are available for those who bought Ramware 
Pascal 80. Call or write for information. 

Send $101 (includes shipping) to; New Classic Software 

-^ ^SSj^ 239 Fox Hill Road, Box S 

l^ffijiS^ fkJv Denville, N) 07834 

Credit card orders: (201) 625-S838 

(PASCAL-80 do«s not implcmcnl vanani records, pointer and window variables, 
oi functions and procedures used a.s parameters.) 



3430 HE=22tHEt8:RE=10+(ASCIREt)-i51t3 

3440 TH=22+TH»8:ER=10t!ASC(ER*)-65)»3 

3450 IFHE=THANDRE=ERG0T0353O 

3440 IFHEOTHANDREOERB0T03530 

3470 IFHE';>THANDABS(HE-TH)<>860T03530 

3480 1FRE< >ERANDABS (RE-ER) < >3G0T03530 

3490 IFHE}THTHENHE=TH!TH=HE+8 

3500 !FRE>ERTHENRE=ER!ER=RE+3 

3510 IFHE<.nHTHENLN=((HE-22+8)/8)+(((RE-10)/3)t9)ELSELN=90+((RE- 

10+3)/3)+(((HE-22)/8)>9) 

3520 IFLl(LN,0)=0G0T03i30 

3530 PRINT9894.CHR«!31)!PN*(PC)"'5 Bod-Boo! - 'jsGOTOSObO 

Drawls the line specified by variable LN, updates 
the BX and LI arrays, and increments the LI line 
total variable. 

3430 LT=LT+l!!FLN>9060T03450 

3440 FOR)(=L1(LN,1)+1TOLI(LN,1)+7:SET()1,LI(LN,2))!NEXTX:BOT03440 

3450 F0RX=L!(LN,2)+1T0LI(LN,2)+2!SET(L1!LN,1),.1!):NEXTX 

3440 IFLI(LN,3)<>0THENBX(LI(LN,3),0)=BX(LI(LN,3),0)+l 

3470 lFLl(LN,4)<>0THENBX(LIiLN,4),0)=BX(LIlLN,4),0)+l 

3480 LnLN.O)=LN . 

Determines if a box has been made on either 
side of the line specified by the LN variable and 
sets the SO variable accordingly. When a box 
has been made by the second player, the box is 
filled. 

3830 SC=0 

3840 IFLN.>90GOT03910 

3850 IFBX(LI(LN,3),0)=4THE!i|SC=SC+IELSE3880 

3840 IFPC=0G0Ta3880 

3870 F0Ry=LIiLN,2)-2T0LI(LN,2)-l!F0RX=LI(LN.l)+lTOLI(LN.l)+7:SET 

(X,y)iNEXTX,Y 

3880 1FBX(LHLM,4),0)=4THENSC=SC+1ELSE4030 

3890 iFPC=OG0T04030 

3900 FDRy=LI(LN,2)+lT0LI(LN,2)+2;FORX=LI(LN,l)+lTOLI(LN,l)+7:SET 

(X,y)!NEXTX,y:GQT04030 

3910 IFBX(LI!LN,3),0):=4THENSC=SC+1ELSE3940 

3920 IFPC=OGOT03940 

3930 FORX=LI (LN, 1)-7T0LI (LM, 1)-1:F0RY=LI (LN,2)+1T0LI (LN.2)+2:SET 

(X,y)!NEXTY,X 

3940 IFBX(LI(LN,4),0)=4THENSC=:SC+1ELSE4030 

3950 IFPC=0G0T04030 

3940 F0RX=Ll(LN,l!+lT0Ll(LN,l)+7;F0Ry=LI(LN.2)+lT0LI(LN,2)+2!SET 

IX.yiiNEXTV.X 

Increments the player's score (PS array) and the 
BT box total variable based on the value in 
variable SC. Then determines if the game is 
complete (a total of 81 boxes are complete). 

4030 IFSC=OTHENX»=""iGOT03030 
4040 FS(PC)=PS(PC)+SC:BT=BT+SC 
4050 IFBT=>81GOT04230 
4040 IFXt=''X"THEN2440ELSE3040 

Performs the end-of-game functions: saves the 
current playing field; generates the fireworks 
display; announces the winner amidst fireworks; 
restores the playing field, and determines if 
another game is desired. 

continued on page 88 
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A feast 
of computing ideas. 



If you work with a 6502/6809-based 
system, you're probably hungry for the 
facts and ideas that will help you 
understand the inner workings of your 
computer. You want to go beyond 
canned software — use your computer 
for more than games — learn the 
advanced programming techniques 
that enable you to get the most out of 
your 6502/6809 system. 

MICRO, The 6502/6809 Journal, 
gives you page after page, month after 
month, of solid information to sink 
your teeth into. MICRO is the premier 
how-to magazine for serious users of 
the Apple, PET/CBM, OSI, Atan, AIM, 
SYM, KIM, and all 6809 based systems 
including the TRS-80 Color Computer. 
It's a resource journal internationally 
respected by professionals in business, 
industry, and education. Every issue of 
MICRO keeps you informed with up-to- 
Ihe-minute data on new products 
and publications: 

• hardware catalog with organized, 
concise description 

• software catalog in an easy-to- 
use format 

• new publications listed and 
annotated 

• reviews and evaluations of sig- 
nificant products 

And there's much more: 

• In-depth hardware tutorials 
bring expert advice into your home or 
office. 

• Detailed discussions of pro- 
gramming languages deepen and 
broaden your programming ability. 

• Complete program listings 
enable you to increase your machine's 
capabilities. 

• Bibliography of 6502/6809 
information helps you to find pertinent 
articles in a timely manner. 

• Special monthly features with 
in-depth treatment of one subject or 
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Spflclal PETfVIC Featurg 



A Look at «h> TRS-M Color Computa r 

Sl>p Up 10 Procrammafala Motion 

A to D.Co nwrt>ra lor Your Comput tf 

You'll love 
every byte. 



YES! I want to get more from 
my microcomputer. Please send me 

_ year(s) of MICRO at $ . /year. 
(Outside U.S. and Canada, please 
indicate via D surface or D air mail.) 



Company 



Sireel 



Ciry Slate Zip Code 

n Check enclosed for S 
D Charge my credit card account 
D VISA D MasterCard 

Signature 



system increase your knowledge of the 
field. 

• Balanced mix of machine- 
specific and general articles foryour 

everyday use as well as long-range 
reference needs. 

• Informative advertising 

focused specifically on 6502/6809 
machines keeps you abreast of latest 
developments. 

• Reader feedback puts you in 
touch with other micro-computerists. 

MICRO is the magazine you need to 
get the most from your own 6502/6809 
system! 

To order, send your check or interna- 
tional money order (payable to MICRO) 
and the order form at left, to; 

Subscription Fulfillment 

MICRO, Dept. Ml 

34 Chelmsford Street 

P.O. Box 6502 

Chelmsford, MA 01824 

Or, for your convenience, call our 
toll-free number: 

1 -800-227-1 61 7, Ext. 564 

(In California, 800-772-3545, Ext. 564) 
and charge your subscription to your 
MasterCard or VISA. (All orders must be 
prepaid in U.S. dollars or charged to 
your MasterCard or VISA.) 

SUBSCRIPTION RATES (US dollars) 
Yearly subscnption (ISSN 027-9002) 
saves 20% off the single-issue price. 
U.S. $24* 
Canada $27 

Europe $27 ($42 by air mail) 
Mexico, Central America, Mideast, 
North and Central Africa $27 ($48 air) 
South America, Far East, South Afnca, 
Australasia $27 ($72 air) 
* SPECIAL OFFER— U.S. ONLY: 
Save even more — 30% off single-issue 
price: 2 years, $42 

Dept. S S 



Expiraiion date 
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4230 IFPS(0)>PS(1)THENPM=0!PX=1ELSEPH=1!P1(=0 

4240 PRINTaO,CHR«(30)!!PRINTJ832,CHR«(31); 

4250 GOSUB5030:FORX=lT0500:NEnX 

4260 CLS:PRINTM4B,TAB!22);'The winner is:" 

4270 F0Ri{=IT0250:NEXTX:e0SUB5430 

4280 F0R)(=1T03 

4290 CLS:PRINT8448,CHR»(23)iTAB((32-LEN(PN«(PH)))/2)!PN»(PN) 

4300 FORY=lT0250:NEXTyjBOSUB5430 

4310 NEXTX 

4320 CLS:PR]NT80,°The final score was: "iPN$(P»i)iPS(Pm;"to ";PN 

♦(PX);PSIPX)j"!!!":G0SUB5230 

4330 PRINTJ89i, "Another gane <Y or N>? "; 

4340 G0SUB6830!lFX«=""THEN4340 

4350 IFX»="N'SOTD9830 

4360 IFX*<>'y°60T04330 

4370 BT=0:LT=OjLN=0:PS(0)=0:PS(1)=0 

4380 F0RX=0TD18O 

4390 LI(X,0)=0:IFX<82BX(X,0)=0 

4400 NEXTX 

4410 PRlNTS8?6,"Sa«e players (winner goes first) <Y or N)? "; 

4420 G0SUB6830:IFX«="THEN4420 

4430 IFX*=°N"60T08150 

4440 IFX«<>"Y"THEN4410ELSEPC=P«:GOT08230 



Converts the 180 zero element values of ttie 2nd 
dimension of the Li array (Li(180,0)) to a string 
vaiue in the zero element of the R0$ array 
(RO$(0)). The 81 zero element values of the 2nd 
dimension of the BX array (BX(81,0)) are 
converted to a string value in the 1st element of 
the R0$ array (R0$(1)). During these conversions 
75 and 128, respectively, are added to the values 
to prevent cassette tape save and load errors. 
The current playing field screen display is then 
saved in the remaining 11 elements of the RO$ 
array. 



5030 F0RR0=0T012!R0«(R0)="" 

5040 IFRO>1GOT05070ELSEIFRO=160T05060 

5050 F0RX=lTD180:R0»(RO)=R0»(R0)+CHR$(LIiX,0)+75)!NEXTX!6OT0515O 

5060 FORX=lT08l!RO»(RO)=RO»(RO)+CHRt(BX(X,0)+128):NEXTX!60T05150 

5070 FORC0=8T050:X=R0t64+C0+1536OsRO$(RO)=R0$(RO)+CHR»(PEEK(X)) 

5080 IFR0=2G0T05M0 

5090 IFC0<100RCO>48G0TO5140 

5J00 IFP££KU)=32THENP0KEX,I91;ELSEIFPEEK(X)>=128THENP0KEX.319-P 

EEKIX) 

5140 NEXTCO 

5150 NEXTRO:RETURN 

Reverses the effects of the playing field save 
subroutine (lines 5030 through 5150). 

5230 F0RR0=0T012 

5240 IFR0>160T05270ELSE1FR0=1G0T05240 

5250 FORX^lT01BO:LI(X,0)=ASCfHID»(RO«(RO),X.l))-75!NEXTX:GOT0528 



5260 FORX=lTOBl:BX(X,0)=ASC(HID»(R0»(RO),X.l))-128:NEXTX:G0Ta52S 



5270 PRINT9!R0-1) 164+64+8, RO«(RO) 

5280 NEXTROiRETURN 

Creates the fireworks display for the end of 
game routine. This routine was originally 



published in the April 1981 issue of SoftSide on 
page 24 as a one liner by Mark Nelson, Palmyra, 
Wl. 

5430 CLE 

5440 F0RY=lT010:CX(Y)=RND(127)!CY(Y)=RND(47)jNEXTy 

5450 F0RY=1T0!0 

5460 SET(CX(Y),CY(Y)):SET(CX(y),47-Cy(Y)):SET(127-CX(Y),CY(Y)):S 

ETU27-CX(Y),47-CY(YI1 

5470 WEXTV 

5480 y=RND(2)!lFY=lTHEN5440 

5490 F0RY=lTD100:NEXTy:CLS:RETURN 

Displays the initial 10 by 10 dot matrix on the 
screen and initializes the BX and LI arrays. 

5630 F0RX=22T094STEPB 
5640 FDRY=10T037STEP3 
5650 SET(X,Y) 

5660 IFX.>86THEN5690ELSE2=((X-22+8)/8) + (((Y-10)/3)t9)jLI(Z,l)=X!L 
nZ,2)=Y 

5670 IFy>34THEN5700ELSEBX(2.1)=Z:BX(Z,2)=Z+9 
5680 LHZ+9,3)=Z!LI{Z,4)=Z 

5690 IFy<37THENZ=90+((y-10+3)/3) + (((X-22)/8)>9):LI!Z,n=X:LI(Z,2 

)=Y 

5700 HEXTY,X:2=0 

5710 F0RX=1T09 

5720 F0RY=90+XT0162+XSTEP9 

5730 Z=Z+l:BX(Z,3)=y:BX(Z,4)=y+9:LI(y+9,3)=Z:LI(y,4)=Z 
5740 NEXTY 

5750 LnX,3)=0:LI(X+Bl,4)=0!LI(90+X,3)=0!LI(90+X+81,4)=0 
5760 NEXTX:RETURN 

Prompts for the players' names and determines 
if either of the players is the computer. 

5830 F0RPC=0T01 

5840 PL!PC)=0:PRINT9640+PCtl28,CHR$(31)j"Nhit is the naie of pla 

yer l"jPC+li!lNPUTPN«(PC)!lFPN$(PC)=""THEN5840 

5850 NEXTPC 

5860 IFPN$(0)="TRS80"ORPN«(0)="CONPUTER"THENPC=0:80SUBA030 

5870 I FPN$ ( 1 ) = " TRSBO ■ ORPN* ( 1 ) = ■ COMPUTER " THENPC= 1 ! S0SUB6030 

5880 RETURN 

Prompts for the playing level of the computer. 

6030 PRlNT9128,CHR«(31)!PRINT"Levels of play ares'iPRINT 

6040 PRINTM = ";PN«(PC)i' is infallible. 10-360 seconds per lov 

e." 

6050 PRINT"2 = 'jPNJIPC);" lay take iinor iistakes. 10-60 second 

5 per »ove.' 

6060 PRINTiPRlNT'NOTE: Level of play is effective during scoring 

situations.' 
6070 PRINT:PRINT"Hhich level should "|PN$(PC)i" use? "; 
6080 GOSUB6830;IFX»="'THEN6080 
6090 PLIPC)=ASC(Xt)-48:IFPL(PC)<10RPL(PC)>2THEN6030ELSERETURN 

Allows a delay for the player to read the 
instructions. The TX$ variable Is used to 
complete the prompt message. 

6230 PRlNTiPRINT'Depress any key for "fTX*; 
6240 G0SUB6830:PRlNTJ192,CHRt(31);:RETURN 
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Prompts the player to ready the printer, then 
copies the screen to the printer. It is assumed 
that the printer is an Epson MX-80 in MX-80 
mode. For an Epson In TRS-80® mode, or for any 
other graphics printer using "standard" TRS- 
80® graphics codes (see article before using 
these printers, however), delete line 6550. if you 
do not have a graphics printer, you may skip this 
routine, replacing it with the line: 6430 RETURN 



4430 PRINTS960, 'Ready the printer then depress any key.'i 
4440 fi0SUB4830:P0KE14425,l 

4450 F0Rl(=lT015!LPRINT!NEnX;LPRINTCHR»(27)!CHRt(7U 
4440 LPR1NTTAB(24I;CHR«(14);"C0NNECTING DOTS" 
4470 LPRINT:LPRINTTAB(34);CHRt(15);CHR$(14)!"(C) 1981 by Charles 
E. Nooster" 
4480 LPRINTTAB(34)iCHRt(198)+STRIN6t(58,211)+CHR»(185) 
4490 LPRlNTCHRt(27);CHR»(72):F0RX=lT010!LPRINT:NE)(T)( 
4500 PR1NT9944,CHR$(J1); 

4510 F0RR0=15340T014320STEP44!LPRINTSTRINe<(42,32); 
4520 FQRC0=0T043 
4530 )[=PEEK(RO+CO) 
4540 IF)«32X=X+44 
4550 IFX>127ANDX<192)(=l(+32 
4540 LPRINTCHRJa); 
4570 NEXTCD:LPR!NT 

4580 NEXIRO:LPRINTCHRt(18);CHR$(20)iCHR$(27)jCHR«(72) 
4590 F0RX=1T044-(PEEK!14425)-1):LPRINT:NEXTX!RETURN 

Prompts the player for a 1 character value. A 
blinl<ing cursor is provided. If the entered 
character Is not alphanumeric, a null string Is 
returned to the caller. 

4830 Xt=":X=PEEK(14417)l254+PEEK(14414)!Y=174 

4840 POKEX,Y!Z=0 

4850 X«=INKEYt! IFXiO" ■THEN4870ELSEZ=2+1 : IFZ<5G0T04S50 

4840 Y=304-Y:60T04840 

4870 IFX«<"0"0R1X«>"9'ANDX«<"A")0RX(>'Z"THENX»='":ELSEPRINTX$! 

4880 RETURN 

Saves the current playing field and the 
necessary variables to tape. The player is then 
prompted for continuing the game. 
See below for disl< changes to this routine. 

7030 B0SUB5030!CLS:PRINT"Place cassette in record then depress a 

ny key."!S0SUB4B30 

7040 PRINT:PRINT"Saving gau onto tape..." 

7050 PRINTI-l,BT,DB,LT,PC,PN»(0),PS(0).PL(0),PN»(l),PSil),PL(l) 

7040 F0RX=0T012:PR!NTI-1,CHR«(34);R0«(X)|CHR»(34)!NEXTX 

7070 PRINT:PRINT"Save coipleted... SPRINT 

7080 PRINT'Continue current gate <Y or N>? "j 

7090 E0SUB4830:IFX»="THEN7O90 

7100 IFXt<>'N'ANDX«<>'Y"SOT07080 

7110 IFX$='N"THEN4330ELSE7280 

Creates the playing field to initialize the BX and 
LI arrays, then loads the variables from tape. It 
then prompts the player for a change in players 
and computer skill level If the computer Is one 
of the players. The screen Is then restored and 
the game is restarted. See below for the disk 
changes to this routine. 



7230 CLS:eOSUB5430:CLS;PRINT"Place cassette in play then depress 
any l(ey,":GOSUB4830 

7240 PRINT:PRINT"Reloading gate trot tape..." 
7250 INPUTI-l,BT,DB,LT,PC,PN»(0),PSIO),PL(0),PN«(l),PS(l).PL(n 
7240 F0RX=0T012!lNPUT#-l,R0«(X):NEXTX 
7270 PRINT:PRINT"Reload coipleted..." 
7280 PRlNT:PRINT"PlaYers are: "!PN»(0)j" and "jPNId) 
7290 PR!NT"Do you nant to change the players <Y or N>? "; 
7300 B0SUB4830:IFX»=""THEN7300 
7310 IFX$="N"G0T07330 

7320 IFX«<>"Y"THEN7290ELSE60SUB5830:e0T07410 
7330 IFPC=0THENPC=1ELSEPC=0 
7340 IFPL(PC)=OGOT07400 

7350 PR1NT!PRINTPN»(PC);" is playing at level "jPKPOi"." 
7340 PRlNT"Do you want to change the level <Y or N>? "; 
7370 GOSUB4S30:IFX»=""THEN7370 
7380 IFX»="N"60T07400 
7390 1FX»< .> " Y " THEN7340ELSE60SUB4030 
7400 1FPC=OTHENPC=1ELSEPC=0 
7410 CLS:60SUB5230:GQT03040 

Displays the initial menu and prompts the player 
for a selection. 

8030 CLS:CLEAR1000!DEF!NTA-Z:RAND0H 

8040 DII1BX(81,4),CL(180),CP(180),CX(180),CY(100),CZ(81),LI(180,4 

),PL(1),PN»(1),PS(1),R0»(12) 

8050 PRINTS0,TAB(24)j"C0NNECTING DOTS" 

8040 PR1NTTAB(14);"(C) 1981 by Charles E. Wooster" 

8070 PRINT9192,"Henu! 1 Start gate." 

8080 PRINT' 2 Resume a previously saved gase." 

8090 PRINT' 3 Instructions." 

8100 PRINT" 4 H you are a poor sport." 

8110 PRINT:PRINT"«hat is your lenu selection? "; 

8120 G0SUB4830: IFX»="'THEN8120ELSEPR1NT 

8130 X=ASC(X«)-48!lFX<10RX>5THEN8070ELSEONX60TQ8150,7230,9030,9B 

30,8140 

8140 DB=1 

8150 SOSUB5830:PC=0 

Sets up the Initial game screen display. 

8230 CLS 

8240 F0RX=0T09 

8250 PRlNT9134+4l(X+l),Xi:PRINT3200+X»44,CHRt(A5+X)j 

8240 NEXTX:GOSUB5430;GOT03040 

Displays the instructions and returns to the 
menu. For 16K tape systems, you must not type 
this routine. It will not fit. In Its place, put the 
following single line: 
9030 GOTO8070 

9030 PRINT8192,CHR$(31)i'The ga« of Connecting Dots is a two 

player gate. Each player" 

9040 PRINT"in turn draws a line betHeen two adjacent dots. The 1 

ine Aav be" 

9050 PRINT"either horizontal or vertical. H a bos is foried by 

the line," 
9040 PRINT'the player scores a point and receives another tu 
rn. Khen a' 

9070 PRlNT'gaie board has been coipleted the player with the big 
best score" 
9080 PRINT'Hins." 
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9090 Ta='iore instructions. ■;B0SUB6230 

9100 PRINT'A iove is entered by typing the iove co-ordinates NL 
,NL Hhere' 

9110 PRINT'the first NL is the nuiber-letter caibination that 
♦or«5 the' 

9120 PR1NT"'FR0H' location and the second NL is the nuiber-lette 
r coibin-' 

9130 PRINT'ation that foras the 'TO' location. The coiputer Hill 
generate' 

9140 PRlHT'the separating cowa. If NL,NL is PR,NT the scree 
n Hill be* 

9150 PRINT'sent to the printer. If NL,NL is SA,VE the gaie Hill 
be saved' 

9160 PRINT'on cassette tape for later coipletion. A lenu selec 
tion of 2' 

9170 PRINT'Hill resuie a gate which Has saved in this tanner.' 

9180 60SUB&230 

9190 PRlNT'After the co-ordinates are entered they lust be ve 
rified. If 

9200 PRlNT'they are not correct respond 'N' and you Hill be giv 
en another' 

9210 PRINT'chance. If they are correct respond 'Y' or 'X'. If th 
e response' 

9220 PRINT'is 'X' and a box is foried the coiputer Hill contin 
ue foriing' 

9230 PRINT'boxes for you until no tore can be foried (a tiie sav 
er)." 

9240 6QSUB6230 

9250 PRINT'lf 'TRSBO' or 'COMPUTER' is entered as either pi a 

yer that' 

9260 PRlNT'player Hill be the coiputer. If both players are. e 

ntered as" 

9270 PRINT" TRSBO' and/or 'COMPUTER', then the coiputer Kill 

play Hith' 

9280 PRINT'itself.'jPRlNT 

9290 PRINT'There are 2 levels of play nhen the coiputer is one o 
r both of 

9300 PRINT'the players. The level specified takes affect Mhen 
the gate' 
9310 PRlNT'has progressed to the point Hbere draning i line h 
ill alloH' 

9320 PRINT'the other player to score. At level 1 the coiputer 
Hill play' 

9330 PRINT'its best but slowest gaie. At level 2 the coiputer i 
ay lake a' 

9340 PRINT'iinor listake or tHO but Hill play a faster gaie.' 
9350 TX»='good luck.'!60SUB6230 

93&0 PRINT'TRSBO wishes you the best of luck and lay the better 
coiputer' 

9370 PRINT'Hin!!!!!" 
93B0 TX(='ienu selection. ':GOSUB&230:60TOB070 

Says "Bye-Bye" and ends the program. 



9830 CLS:PRINT844B,TAB(23);CHR»(23);'Bye-Bye' 
9840 FORX=1T0500:NEXTX:CLS:CLEAR50;END 



If you have a disk system, the following lines 
should be added or substituted for the 
corresponding lines in the tape version above. 



7030 GOSUBS030 

7032 CLS:PRINT"Iiage nuiber (l-9)';:eOSUB6830 

7034 IF»<'1'ORX«>'9'THEN7032 

703i OPEN"0',l,'DOTSAVE'+X»+'/DAT' 

7040 PRINT:PRINT'Saving gaie onto disk...' 

7050 PRlNTIl,BTj','!DBi',";LT;',"|PC!',';PN«(0)j'.'',PSlO)i',')PL 

(0);','iPN»(l);",'iPS(l)i','jPL<l) 

7060 F0RX=0T012:PRINTIl,CHR«{34);R0»(X);CHR$(34)!NEXTXiCL0SEl 

7230 CLS!60SUB5630 

7232 CLSiPRINT'Iiage nuiber (l-9)';iGDSUB6830 

7234 1FX»<'1"0RX$>'9"THEN7232 

7234 OPEN"I',l,'DOTSAVE"+X»+'/DAT' 

7240 PRINT:PRINT'Reloading gaie froi disk...' 

7250 INPUTil,BT,DB,LT,PC,PN$(0),PS(0),PL(0),PNt(l),PS(l),PL(l) 

7260 FORX=0TO12:INPUTil,RG$(X):NEXTXjCL0SEl 



TRS-80® SWAT TABLE FOR: 




DOTS 




SWAT 




LINES 


CODE 


LENGTH 


1000 - 


2130 


HO 


427 


2140 - 


2230 


01 


507 


2240 - 


2350 


BY 


402 


2360 - 


2520 


EN 


276 


2530 - 


3060 


AH 


425 


3070 - 


3180 


N6 


451 


3190 - 


3510 


YT 


415 


3520 - 


3860 


FP 


380 


3B70 - 


4040 


CA 


475 


4050 - 


4320 


6U 


352 


4330- 


4440 


im 


30S 


5030 - 


5240 


EI 


349 


5250 - 


5630 


SV 


340 


5640 - 


5750 


EQ 


380 


5760 - 


6070 


K 


520 


6080 - 


6500 


JZ 


403 


6510 - 


6850 


JB 


279 


6860 - 


7110 


UK 


412 


7230 - 


7340 


NU 


428 


7350 - 


8070 


RE 


419 


8080 - 


8260 


ID 


340 


9030 - 


9110 


LI 


554 


9120 - 


9200 


HH 


560 


9210 - 


9290 


H6 


515 


9300 - 


9830 


B6 


520 


9840 - 


9840 


XR 


24 
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ZBASIC 2.0 



A review by Tim Kniglit 



by Andy Gariepy (Simutek, Inc.). 
System Requirements: 16K TRS- 
80® Model I or III. Suggested retail 
price: Disk — $89.95, Tape — 
$79.95 

What is a compiler? 

A compiler, in simple terms, is an 
advanced program which takes a 
computer program in one language 
and changes it into an equivalent 
program in another language. The 
most popular type of compiler for 
the TRS-80® is a BASIC compiler, 
one which takes another BASIC 
program and "transforms it" into 
Machine Language. 

The most obvious advantage of 
this process is an improvement in 
execution speed. This improvement 
may very well enhance your chances 
of selling a program you have writ- 
ten to the commercial market. For 
instance, a BASIC game doesn't 
have a great chance of making it big 
on the software market. However, 
compiled into Machine Language, 
the extra speed it gains may give it a 
much better shot at selling. Machine 
Language programs execute approx- 
imately 300 times faster than BASIC 
programs, and compiled programs 
(BASIC transformed into Machine 
Language) execute about 100 times 
as fast as their BASIC counterparts. 

There are many compilers for the 
TRS-80® on the market today. 
There is BASCOM, by Microsoft, 
but it is too expensive for most, only 
for disk systems, and requires pay- 
ment of substantial royalties to 
Microsoft if a program made with it 
is sold. There are other, less expen- 
sive compilers like Tiny Comp and 
Accel 2, but these aren't as powerful 
as BASCOM and don't offer many 
speed improvements. A while ago, a 
program called ZBASIC was in- 
troduced. It wasn't a phenomenal 
compiler either, considering that 
many restrictions were placed on 
programs written with it. However, 
something new and exciting has 
come out from the makers of the 
original ZBASIC (Simutek, Inc.). 



New and Improved 

ZBASIC 2.0 is a completely new 
compiler for the TRS-80®. It will 
work on a Model I or III disk or 
tape system with 16K or more 
memory. There are no royalties im- 
posed on programs made with 
ZBASIC 2.0 and it is such an ex- 
citing and innovative program that 
it should prove quite popular. 

ZBASIC 2.0 on tape contains six 
versions of the program and is ac- 
companied by a nearly 100 page 
manual. The manual explains that 



"The manual alone is very 
exciting. The features 
described are so incredible 
and varied — I can't believe 
so much can be stored in 
one computer. Extensive 
instructions are given on 
how to load any single 
version of ZBASIC for either 
disk or tape." 



ZBASIC 2.0, by Andy Gariepy, is 
an interactive compiler which will 
reside in memory along with any 
BASIC programs. The user needs 
merely to type in a BASIC program, 
press three keys at the same time, 
and the program will be compiled 
and ready to test. This is a great 
convenience. 

The manual alone is very exciting. 
The features described are so in- 
credible and varied — I can't believe 
so much can be stored in one com- 
puter. Extensive instructions are 
given on how to load any single ver- 
sion of ZBASIC for either disk or 
tape. 

I loaded the program and started 
to experiment. Initially, the pro- 



gram asks for configuration stan- 
dards. These standards set 
parameters such as the string 
memory size which should be 
allocated and what the maximum 
string size will be. ZBASIC has a 
unique method for storing 
variables, so these questions may be 
either ignored or set to the user's 
preference. 

After answering these questions, I 
checked in the manual to see what I 
could do next. There is a short pro- 
gram, written in BASIC, which uses 
the SET (X,Y) command to make a 
white box on the screen. I entered 
the program and ran it in BASIC. 
As could be expected, it ran quite 
slowly. I then pressed the compiling 
keys, the comma, the period, and 
the division sign (,./) all at the same 
time to compile the program. It 
compiled instantly, a nice change 
from the slow Accel 2 program 
compihng to which I've grown so 
accustomed. 

Unbelievable! 

I ran the compiled program and 
couldn't believe my eyes! Almost 
immediately the screen was filled 
with a white box, quite a contrast 
from its slow BASIC counterpart. I 
then had three options. I could run 
the program again, return to 
BASIC, or save the program to 
tape. Any of these may be executed 
with a single key and are a tremen- 
dous improvement over thQ ACCEL 
2 method of loading a separate pro- 
gram and specifying memory ad- 
dresses galore before anything can 
be accomplished. 

There were a couple of things I 
discovered immediately — first, on- 
ly integer math is supported by 
ZBASIC 2.0 using the standard 
methods. (I later found I could have 
ultra-high precision math using a 
special ZBASIC technique that I'll 
describe below.) Also, a ZBASIC 
2.0 compiled program cannot be 
stopped by using the BREAK key. 
Instead, a key-checking device must 
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be put in the program to test for the 
BREAK key being pressed and stop 
the program. 

Differences 

Most of BASIC'S commands 
work well with ZBASIC. However, 
there are some differences — almost 
all positive. These differences are 
really just improvements on BASIC 
itself. For instance, the POS com- 
mand will not return a number be- 
tween and 63 (which is fairly 
useless) but a number between and 
1023 instead, specifically showing 
the position of the cursor on the 
screen (very useful!). Another im- 
portant difference is that STOP will 
end the program and END will 
reboot the computer (the equivalent 
of hitting the reset key). 

There are extensive sections in the 
manual describing the minor dif- 
ferences in features such as 
FOR/NEXT loops, READ/DATA 
operations, and INPUT. The 
manual is generally well detailed in 
pointing out these differences. Tape 
input/output and Disk input/out- 
put are also well documented. 

Precisely! 

High precision math is one of the 
greatest features of ZBASIC 2.0. It 
is termed as "@ MATH" since the 
@ symbol signifies where in the pro- 
gram a high precision math opera- 
tion is taking place. Believe it or 
not, the high precision math 
package is accurate up to sixty-two 
places! There are a few restrictions 
on "@ MATH." Only one opera- 
tion is permitted per line and 
numbers must be defined as strings 
rather than integers. However, 
sixty-two place precision is certainly 
worth the extra consideration. 

Special Functions 

There are many special features 
and functions in ZBASIC 2.0, mak- 
ing it a superior compiler. The 
special commands are not recog- 
nized by BASIC, so the programs 
using them can't be tested in BASIC 
before compiling (though you may 
alternate between the compiled pro- 
gram and BASIC whenever you 
Uke). 

The block move command, 

9ilj 



similar to the LDIR and LDDR in- 
structions in Assembly Language, is 
implemented in ZBASIC 2.0 with 
the SIN and COS commands. (You 
can see how the results would be 
very different if this were tested in 
BASIC.) The block move is im- 
plemented at 100,000 bytes per sec- 
ond which means that every single 
byte of the entire computer's 
memory could be moved in less than 
a second. Some useful purposes for 
block move commands could be to 
examine large areas of memory, to 
exchange certain areas of memory, 
or to relocate other programs. The 
possibilities are exciting. 

Next is the compare command. 
This is an extremely rapid search 
through memory for any type of 
argument. It is implemented with 
the CINT and CDBL commands. 
Some very handy applications for 
this might be to locate every GOTO 
statement in memory, or perhaps to 
find the exact memory location of 
the Tandy Copyright! 

If one wants the entire screen to 
be graphically inverted, this is also 
supported by ZBASIC 2.0. For in- 
stance, if random graphic blocks 
were set in various places around the 
screen and the invert command was 
implemented (FIX), then every 
previously filled location would be 
blank, and every previously blank 
space would be filled with white. 
This can be a lot of fun in games. 
For instance, if you were program- 
ming a game in which an explosion 
was to occur, the invert (FIX) com- 
mand could create some quick 
flashes, really looking like an 
explosion. 

Tone generation, something near- 
ly impossible to accompUsh in 
regular BASIC, is supported with 
yet another command in ZBASIC. 
The tone command (CVD) will 
generate any tone for any length. It 
can be used for sound effects, 
music, or prompts. 

In addition to these remarkable 
functions, features such as high 
speed multiplication, high speed 
division and high speed multiplica- 
tion by 10 are fully implemented. 
Also, tape and disk input/output 
have their own special commands to 
enable high speed saving or retriev- 
ing of data. Yet another function is 
a Machine Language call (somewhat 
Uke the USR function) which is 
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called by the ZBASIC 2.0 command 

TAN. 

For Machine Language program- 
mers, ZBASIC has several other 
special functions. The LOC com- 
mand can read the stack pointer 
(SP) or disable interrupts (DI) 
directly from BASIC. A particularly 
useful feature is the 16-bit peek 
command (CSNG). This might be 
used for finding out the setting of 
the USR bytes (bytes 16526 & 16527) 
without having to make two peeks. 
User defined functions are also im- 
plemented. Making calls to DOS is 
easy with the commands supported 
by ZBASIC 2.0 in this manner. 

Handy Helpers 

The appendices to the manual are 
very helpful. Appendix A contains a 
bevy of programs which won't work 
well or at all in regular BASIC, but 
are extremely powerful in ZBASIC 
2.0. Graphic, Memory Move, Ping 
Pong, and other well-documented 
programs, twenty in all, are in the 
appendix and are a great deal of fun 
to experiment with. 

In appendix B, the error messages 
are explained. Some very helpful 
memory maps are to be found in 
Appendix C. Relocation is covered 
in Appendix D, and an explanation 
of the free MISOSYS command file 
on the disk version follows. There is 
an index in the back of the manual 
for quick reference. 

Fantastic! 

As you can see, this is a program 
like no other. A compiler such as 
this can greatly expand the 
marketing potential of program- 
mers not quite accustomed to 
Machine Language (or lacking the 
time to learn it) and will greatly 
speed up any programs compatible 
with ZBASIC 2.0. Above all, it is 
enjoyable to use, and the extensive 
commands are a constant source of 
amazement. 

I highly recommend this program 
for any TRS-80® user. It is, without 
a shadow of a doubt, the most 
useful program I own. It is well con- 
ceived and thoroughly documented. 
ZBASIC 3.0 should be coming out 
in about a year and is rumored to 
make Microsoft BASIC obsolete. 
Bill Gates, watch out! O 
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The Most Spectacular Extravaganza Ever. . . 

For Apple Users 



At Applefest '82 hundreds of manufacturers, 
distributors and dealers will sliowcase the entire 
spectrum of Apple-compatible products including 
computers, components, peripherals, plug-in cards, 
publications, gifts, magazines, services, accessories 
and software for home, office and school. 
Hands-on centers and multimedia presentations will 
demonstrate the newest applications for business, 
education and entertainment. 
Seminars and workshops, conducted by the world's 
leading Apple authorities, will detail new uses to 
make your Apple more enjoyable and more useful 
than you ever imagined. 

You'll meet thousandsof other Apple owners and find 
the newest of everything for your Apple under one 
roof. . . and for sale at super show prices. 
So if you use an Apple ... or are thinking about 
buying one, you won't want to miss a minute of 
Applefest '82. 

Ticket & Hotel Information 

Send your check and a note indicating the specific show you wish 
to attend. Ticl<ets and hotel information will be mailed back to 
you. Tickets can also be purchased at the show. Make all checks 
payable to Northeast Expositions Inc. 824 Boylston Street, 
Chestnut Hill, Mass. 02167 Tel: 61 7 739 2000. 

Exhibitor Information 

For specific exhibitor information on one or all of the Applefest '82 
shows call Northeast Expositions at the telephone number above. 



Applefest/ Boston 

Fri-Sun May 14-16, 1982 

Hynes Auditorium 

Show Hours: 11 AM to 6PM Daily 

Admission: S6 per day or $10 for 2 days, 

$15 for 3 days 

Applefest/Mjnneapolis 

Thurs-Sun Sept 16-19, 1982 
Minnesota Auditorium and Convention Hall 
Show Hours: 1 1 AM to 6 PM Daily 
Admission: $5 per day or $8 for 2 days, 
S12 for 3 days, $15 for 4 days 

Applefest/Houston 

Fri-Sun Nov 19-21, 1982 

Albert Thomas Convention Center 

Show Hours: I PM to 1 0PM Daily 

Admission: $5 per day ox $8 for 2 days, $ 1 2 for 3 days 

Applefest/San Francisco 

Fri-Sun Dec 3-5, 1982 

Moscone Center 

Show Hours: 1PM to 10PM Daily 

Admission: $5 per day or $8 for 2 days, $ 1 2 for 3 days 

Applefest is produced by Northeast Expositions Inc. and is sanctioned 
byAppleComputer Inc. andThe Boston Computer Society. 

*Apple and Applefest are registered trade and service marl<s of Apple 
Computer Inc. 



NEIV PRODUCTS 




FUTURE SOLUTIONS, INC. 

207 E. 85th Street 

Suite 447 

New York, NY 10028 



The MICROCART® is a new concept 
in computer cabinetry designed by com- 
puter professionals to provide both 
home and office users with an organized 
means of consolidating microsystem 
components. Its many features include 
mobility, work space expansion and 
flexibility, and a slide-out computer 
work surface which allows easy access 
and provides for glide-in storage when 
the computer is not in use. It also offers 
a security lock for the cabinet, insuring 
safety for your computerware, pro- 
grams-in-process and system. Below the 
cabinet there is ample shelf space for the 
storage of printers, diskettes, printout 
paper, or other needs. 

MICROCART® is available in 
walnut, oak and teak finishes and is 36 
inches high, 32 inches wide and 22 inches 
deep. It retails for $439.95. 




DON'T ASK COMPUTER 
SOFTWARE 

2265 Westwood Blvd. B-150 
Los Angeles, Ca 90064 
(213)397-8811 

Here's a word game that's com- 
petitive, fast-paced, exciting, addictive 
and educational: WORDRACE by 
Don't Ask. WORDRACE is for a 32K 
ATARI® 400/800 with disk drive and 
BASIC Cartridge or 48K Apple^^"^ II or 
II -I- with disk drive and Applesoft. This 
one to four player word game, for 
players age nine to adult, features 3 
levels of play and requires strategy and 



speed. WORDRACE builds players' 
vocabularies while they have fun. Each 
turn begins with a word, six possible 
definitions, and a counter starting at 600 
points. When you select the correct 
definition you score the number of 
points remaining. Guess incorrectly and 
you lose the number of points left. The 
disk contains over 2000 words and 
definitions. Don't Ask plans to issue 
companion disks, some containing extra 
words and definitions, and others with 
the materials to adapt the basic WORD- 
RACE game to other subjects, such as 
famous names in history. WORDRACE 
retails for $24.95. 




BINARY CORPORATION 

3237 Woodward Ave. 
Berkley, MI 48072 
(313)548-0533 

Now owners of ATARI® 810 disk 
drives, purchased prior to ATARI® 's 
fast formatting engineering change, can 
increase the formatting speed of their 
machines by more than 30%. 
ATARI® 810 disk drives with the new 
fast formatting change can increase in 
efficiency by as much as 10 percent. 

FAST-CHIP is a well documented kit 
requiring only one lead to be wired to 
the disk's main electronics board. Any 
person who knows how to solder can ac- 
complish this task in less than 1 5 minutes 
with a low wattage soldering iron and a 
screw driver. 

FAST-CHIP is available at 
ATARI® dealers worldwide and carries 
a one-year guarantee. Installation is 
available from most local dealers for a 
slight fee, or the drive can be sent post 
paid to BINARY at the address above 
with payment of $39.95 plus $15.00 to 
cover shipping, handling, and installa- 
tion. Retail price is $39.95. 
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EDU-WARE SERVICES, INC. 
P.O. Box 22222 
Agoura, CA 91301 

College-bound students preparing for 
the Scholastic Achievement Test (SAT) 
will find two new software tutorials 
helpful in mastering vocabulary and 
deciphering new words — necessary 
skills for the "antonyms" portion of the 
test. 

PSAT Word Attack Skills and SAT 
Word Attack Skills each contain two 
diskettes. Words, selected for their fre- 
quent appearance on the PSAT/SAT, 
are grouped into lessons. In each lesson, 
students first select the word's synonym. 
The word is then reviewed and, finally, a 
timed test prepares students to function 
under pressure. 

PSAT and SAT Word Attack Skills 
are independent tutorials, but may be 
purchased and used together as a com- 
prehensive sequence. They're available 
for the Apple IF"^ and 11+ computer 
with 48K of memory and DOS 3.3. Each 
two-disk package retails for $49.00. 




subLOGIC COMMUNICATIONS 

CORP. 

13 Edgebrook Drive 

Champaign, IL 61820 

(217)359-8482 

A2-ED1 Whole Brain Spelling, writ- 
ten and designed by David Manton and 
Susan Campanini, is the first in a series 
of educational software packages from 
subLOGIC. The program has been 
designed to help improve spelling in a 
manner as entertaining as it is educa- 
tionally sound. It effectively utilizes the 
graphics and color capabilities of the 
Apple^*^ II or II + computer to provide 
positive user-feedback and to emphasize 
visual aspects of the learning process. 

The program is user friendly. You can 
move to any desired lesson section, 
choose your own word lists to study, and 
proceed at your own rate. A main Spell- 
ing Menu is accessible from any portion 



of the programs and lesson instructions 
are always available. 

200 10- word lists of practice spelling 
words, organized in order of increasing 
spelling difficulty, are included with 
Whole Brain Spelling. Supplementary 
word lists are also available in the 
following catagories: Medical, Scien- 
tific, Secretarial, Fairy Tale, and A 
Child's Garden of Words. 

A2-ED1 Whole Brain Spelling is 
available at most computer stores or can 
be ordered directly from subLOGIC. 
The program requires 48K memory, a 
disk drive and either an Apple^"*^ II + or 
an Apple^M II with Applesoft in ROM. 
A color monitor is recommended. For 
direct orders add $1.50 for shipping and 
specify UPS or first class mail. Illinois 
residents add 5% sales tax. Unless other- 
wise requested the MAIN word list will 
be included with each program ordered. 
Retail price is 334.95. 



ARGUS, INC. 

Box 9777 

Baltimore, MD 21204 
(301)321-8451 



LEGGS^^ (U.S. patent pending) 
solve the problem of where to put the 
paper for your Epson MX-80 printer — 
underneath it! LEGGS are clear, acrylic 
plastic and install in seconds with a twist 
of the wrist — no drilling or tools re- 
quired. They provide room for 3" 
of paper with access from all four sides. 

Available from your local computer 
dealer or direct from Argus, Inc. 
postpaid. Retail price is $15.00. 




SoftSide's New Products section is an 
effort to inform our readers of newly 
available microcomputer products. 
However, SoftSide assumes no respon- 
sibility for product quality, company 
reliability or data accuracy. The infor- 
mation printed is submitted by pro- 
moters and selected for publication on a 
first-come, editorial preference, and 
computer compatible basis. Due to 
space limitations, we reserve the right to 
modify content of submissions. Submis- 
sions may be sent to: 

SoftSide Magazine 
New Products Editor 

6 South Street 
Milford, NH 03055 
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NOT VERY FARAWAY. 
IN THE NOT TOO DISTANT FUTURE - 

^•Js£felSSUE#32 0F;., :• 



RDVENTURE/SIMULATION 

DARE YOU ATTEMPT 

OPERATION SABOTAGE 

... Can you destroy the alien space station and 
remove the secret plans. 

ARE YOU READY TO EXPLORE THE WORLD OF... 
TRON in ENTERTAINMENT TOMORROW 

PUT ON YOUR SURGICAL GLOVES, TURN ON 
YOUR COMPUTER AND DISCOVER THE... 

ANATOMY OF AN ADVENTURE 

^ PLUS 

CATS (Part Two), A report on the NCC, another Apple 
Diskourse, Reviews and more fun than a barrel of Ores. 
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Only Mitch Waite can take the basic building 
blocks of microcomputer knowledge and 
present them to you in such a friendly and 
enjoyable way Get down to basics with 
Mitch Waite's PRIMER SERIES from Sams. 

BASIC PROGRAMMING PRIMER, No. 
2 1 586, $ 1 1 .95. A complete guide to BASIC, 
today's most widely used microcomputer 
language. By Mitch Waite and Michael 
Pardee. 

COMPUTER GRAPHICS PRIMER, No. 
2 1 650, $ 14.95. This masterpiece by Mitch 
Waite shows you how to create graphics on 
your microcomputer video screen, including 
colorful drawings, plans, maps and 
schematics. 



CP/M® PRIMER, No. 21791, $14.95. 
A non-technical discussion of the celebrated 
CP/M disk operating system for 8080 and 
Z-80 based systems. By Mitch Waite and 
Stephan Murtha. 

MICROCOMPUTER PRIMER (SECOND 
EDITION), No. 21653, $14.50. This book is 
indispensable to the reader who wants to 
gain a solid understanding of microcomputer 
systems, from basic hardware through 
operating systems and user programming 
techniques. By Mitch Waite and Michael 
Pardee. 

PASCAL PRIMER, No. 21793, $16.95. A 
complete, comprehensive introduction to 
one of today's hottest computer languages. 
By Mitch Waite and David Fox. 

Learn the basics of microcomputers with 
Sams microcomputer books. Wth Mitch 
Waite's PRIMER SERIES, it's easy as ABC. 



To order these Sams books or to get 
the name of your local Sams retailer, call 
800-428-3696 toll-free, or 317-298-5566 
and reference AD1 64. 
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SAMS BOOKS 

Howard W Sams & Co., Inc. 

4300 West 62nd Street, P.O. Box 7092 

Indianapolis, IN 46206 



EASY AS ABC 




Offer good in U.S. only and expires 8/31/82. Prices subject to change without notice. 
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forgets:' 



MORE THAN JUSTANOTHBI PRETTY FUL 



Says who? Says ANSI. 

Specifically, subcommittee X3B8 of the American 
National Standards Institute (ANSI) says so. The fact 
is all Elephant™ floppies meet or exceed the specs 
required to meet or exceed all their standards. 

But just who is "subcommittee X3B8" to issue such 
pronouncements? 

They're a group of people representing a large, 
well-balanced cross section of disciplines— from 
academic, government agencies, and the computer 
industry. People from places like IBM, Hewlett-Packard, 
3M, Lawrence Livermore Labs, The U.S. Department 
of Defense, Honeywell and The Association of Com- 
puter Programmers and Analysts. In short, it's a bunch 
of high-caliber nitpickers whose mission, it seems, in 
order to make better disks for consumers, is also to 



make life miserable for everyone in the disk-making 
business. 

How? By gathering together periodically (often, 
one suspects, under the full moon) to concoct more 
and more rules to increase the quality of flexible 
disks. Their most recent rule book runs over 20 single- 
spaced pages— listing, and insisting upon— hundreds 
upon hundreds of standards a disk must meet in 
order to be blessed by ANSI. (And thereby be taken 
seriously by people who take disks seriously.) 

In fact, if you'd like a copy of this formidable docu- 
ment, for free, just let us know and we'll send you 
one. Because once you know what it takes to make 
an Elephant for ANSI . . . 

We think you'll want us to make some Elephants 
for you. 



ELEPHANlHEiBrY DUTY DISKS. 

Distributed Exclusively by Leading Edge Products, Inc., 225 Turnpike Street, Canton, Massachusetts 02021 
Call: toll-free 1-800-343-6833; or in Massachusetts call collect (617) 828-8150. Telex 951-624. 



